129814
столько раз учителя, ученики и родители
посетили сайт «Инфоурок»
за прошедшие 24 часа
+Добавить материал
и получить бесплатное
свидетельство о публикации
в СМИ №ФС77-60625 от 20.01.2015
Дистанционные курсы профессиональной переподготовки и повышения квалификации для педагогов

Дистанционные курсы для педагогов - курсы профессиональной переподготовки от 6.900 руб.;
- курсы повышения квалификации от 1.500 руб.
Престижные документы для аттестации

ВЫБРАТЬ КУРС СО СКИДКОЙ 50%

ВНИМАНИЕ: Скидка действует ТОЛЬКО сейчас!

(Лицензия на осуществление образовательной деятельности № 5201 выдана ООО "Инфоурок")

ИнфоурокИнформатикаТестыПаскаль тілінің басқару: шартты және шартсыз көшу, таңдау операторлары. (есептер шығару )

Паскаль тілінің басқару: шартты және шартсыз көшу, таңдау операторлары. (есептер шығару )

библиотека
материалов
Скачать материал целиком можно бесплатно по ссылке внизу страницы.

Сабақтың тақырыбы: Паскаль тілінің басқару: шартты және шартсыз көшу, таңдау

операторлары. (есептер шығару )

Сабақтың мақсаты:

Білімділігі: Оқушыларды Паскаль тілінің if және case (таңдау) операторларын пайдаланып программа құруға үйрету;

Дамытушылығы: Паскаль тілінің if және case (таңдау) операторларын пайдаланып программа құра отырып оқушыларды өз беттерімен программа құруға дағдыландыру, логикалық ойлау қабілеттерін дамыту.

Тәрбиелік: Оқуыларды адамгершілікке, патриоттыққа, ұқыптылық жауапкершілдікке

тәрбиелеу.

Сабақтың түрі: практикалық сабақ

Сабақтың барысы:

1. Ұйымдастыру

2. Өткен материалды қайталау

3. Жаңа сабақты түсіндіру

4. Сабақты бекіту

5. Үйге тапсырма


Өткен материалды қайталау сұрақтары

  • Құрылымдық операторларға қандай операторлар жатады?

  • Олар неше топқа бөлінеді?

  • Қарапайым және құрылымдық операторлардың айырмашылығы неде?

  • Паскаль тілінде операторлық жақша дегеніміз не?

  • Шартты оператордың қандай түрлері бар?

  • Іf операторының жалпы жазылу түрі қандай?

  • Таңдау операторы не үшін пайдаланылады?


Компьютермен жұмыс

1. Екі санның үлкенін табатын программа құр.

Program max;

Var a, b, max: integer;

Begin

Readln (a,b);

If a>b then max:= a else max:=b;

Writeln (‘ max= ’ , max);

End.


2. Үш санның үлкенін табатын программа құру керек.

Program max;

Var a, b, c, x, max: integer;

Begin

Readln (a, b, c);

If a>b then max:= x else max:=c;

Writeln (‘ max= ’ , max);

End.


3 Екі санның кішісін табатын программа құру керек.

Program min;

Var a, b, min : integer;

Begin

Readln (a, b);

If a

Writeln ( ‘ min = ‘ , min) ;

End.


4. Үш санның кішісін табатын программа құру керек.

Program min;

Var a, b, c, x, min : integer;

Begin

Readln (a, b, c);

If a

If x

Writeln ( ‘ min = ‘ , min) ;

End.


5 Үш кесіндінің ұзындықтары берілген. Егер бұл үш кесіндіден үшбұрыш құру мүмкін болса, онда оның периметрін және ауданын табыңдар.

Program e5;

Var a, b, c : integer;

P1, p, s: real;

Begin

Readln (a, b, c);

If a+b>c then p1: = a+b+c ;

P:= (a+b+c)/2;

S:=sqrt (p*(p-a)*(p-b)*(p-c));

Writeln ( ‘ p1= ‘ , p1:5:2) ;

Writeln (‘ s=’,s:5:2);

End.


6. Адам жасына қарап, оларды әлі мектепке бармаған, мектеп оқушысы, жұмысшы, зейнеткер деген төрт топтың біріне жатқызатын программа құрыңдар. Адам жасы пернетақтадан енгізіледі.

Program e6;

Var x : integer;

Begin

Writeln (‘ adam jasin engiz’ );

Readln (x);

If x<=6 then writeln (‘ ali mektepke barmagan’ ) else

If (x>6) and (x<=17) writeln (‘ mektep okushisi ‘) else

If (x>17) and (x<58) writeln (‘ jumisshi’) else writeln (‘ zeinetker’);

End.


7. Екі сан берілген. Егер бірінші санның абсолют шамасы екінші санның абсолют шамасынан артық болса, онда біріншісін бес есе азайту керек, әйтпесе екі санды да өзгеріссіз экранға шығару керек.

Program e7;

Var x, y : real;

Begin

Writeln (‘x , y-?);

Readln (x, y);

If abs (x)< abs(y) then x:=x/5;

Writeln (x:5:2, y:5:2);

Readln;

End.


8.Пернетақтадан трамвай билетінің нөмірі (1 орынды 6 сан ) енгізіледі. Билет «бақытты» нөмір болатынын анықтаңдар. Бақытты билеттің алғашқы 3 цифрының қосындысы соңғы 3 цифрының қосындысына тең болады.

Program e8;

Var x, y, z, r, k, t, s, n : integer;

Begin

Read (x, y, z, r. k. t );

S:= x+y+z;

N:= r+k+t;

If S= N then writeln (‘ bakitti nomer’) else writeln (‘ bakitti nomir emes’);

End.



Үйге тапсырма: Паскаль тілінің басқару: шартты және шартсыз көшу, таңдау операторлары

Бағалау. Оқушылардың орындаған тапсырмаларын бағалау.














Общая информация

Номер материала: ДВ-481062

Вам будут интересны эти курсы:

Курс повышения квалификации «Методика преподавания информатики в начальных классах»
Курс повышения квалификации «Основы создания интерактивного урока: от презентации до видеоурока»
Курс повышения квалификации «Внедрение системы компьютерной математики в процесс обучения математике в старших классах в рамках реализации ФГОС»
Курс повышения квалификации «Организация работы по формированию медиаграмотности и повышению уровня информационных компетенций всех участников образовательного процесса»
Курс повышения квалификации «Облачные технологии в образовании»
Курс «Фирменный стиль» (Corel Draw, Photoshop)
Курс «Оператор персонального компьютера»
Курс «3D Studio MAX»
Курс «WEB-ВЕРСТКА (HTML, CSS)»
Курс повышения квалификации «Развитие информационно-коммуникационных компетенций учителя в процессе внедрения ФГОС: работа в Московской электронной школе»
Курс повышения квалификации «Использование компьютерных технологий в процессе обучения в условиях реализации ФГОС»
Курс профессиональной переподготовки «Математика и информатика: теория и методика преподавания в образовательной организации»
Курс повышения квалификации «Современные тенденции цифровизации образования»
Курс повышения квалификации «Современные языки программирования интегрированной оболочки Microsoft Visual Studio C# NET., C++. NET, VB.NET. с использованием структурного и объектно-ориентированного методов разработки корпоративных систем»
Курс повышение квалификации «Применение интерактивных образовательных платформ на примере платформы Moodle»

Благодарность за вклад в развитие крупнейшей онлайн-библиотеки методических разработок для учителей

Опубликуйте минимум 3 материала, чтобы БЕСПЛАТНО получить и скачать данную благодарность

Сертификат о создании сайта

Добавьте минимум пять материалов, чтобы получить сертификат о создании сайта

Грамота за использование ИКТ в работе педагога

Опубликуйте минимум 10 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Свидетельство о представлении обобщённого педагогического опыта на Всероссийском уровне

Опубликуйте минимум 15 материалов, чтобы БЕСПЛАТНО получить и скачать данное cвидетельство

Грамота за высокий профессионализм, проявленный в процессе создания и развития собственного учительского сайта в рамках проекта "Инфоурок"

Опубликуйте минимум 20 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Грамота за активное участие в работе над повышением качества образования совместно с проектом "Инфоурок"

Опубликуйте минимум 25 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Почётная грамота за научно-просветительскую и образовательную деятельность в рамках проекта "Инфоурок"

Опубликуйте минимум 40 материалов, чтобы БЕСПЛАТНО получить и скачать данную почётную грамоту

Включите уведомления прямо сейчас и мы сразу сообщим Вам о важных новостях. Не волнуйтесь, мы будем отправлять только самое главное.