Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Инфоурок / Другое / Презентации / Презентация на тему "Программирование на языке Pascal"

Презентация на тему "Программирование на языке Pascal"

Идёт приём заявок на самые массовые международные олимпиады проекта "Инфоурок"

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

1. Бесплатные наградные документы с указанием данных образовательной Лицензии и Свидeтельства СМИ;
2. Призовой фонд 1.500.000 рублей для самых активных учителей;
3. До 100 рублей за одного ученика остаётся у учителя (при орг.взносе 150 рублей);
4. Бесплатные путёвки в Турцию (на двоих, всё включено) - розыгрыш среди активных учителей;
5. Бесплатная подписка на месяц на видеоуроки от "Инфоурок" - активным учителям;
6. Благодарность учителю будет выслана на адрес руководителя школы.

Подайте заявку на олимпиаду сейчас - https://infourok.ru/konkurs

  • Другое
Тема: Программирование на Pascal Форма: соревнование в группах Цель урока: вы...
Length Var Circle Integer While Begin String Rectangle Program Real For i:=1...
Посчитайте G при x=123, y=-247, z=-7569 В программе Pascal
G= program Formyla; var x,y,z:integer; g:real; begin x:=123;y:=-247; z:=-7569...
Откройте программу PowerPoint, запишите операторы Открыть цикл с параметром о...
For x:=1 to N do Write (‘Площадь круга равна’, S, ‘кв.см’); Rectangle (100, 1...
18 Div 5 19 Mod 6 30 Div 4 33 Div 3 27 Mod 7 42 Mod 5 1 3 1 Div Mod 7 6 11 2
20 Div 6 21 Mod 5 23 Div 3 44 Div 4 46 Mod 8 37 Mod 5 2 3 1 Div Mod 7 6 11 2
21 Div 9 21 Mod 4 34 Div 3 77 Div 7 49 Mod 8 17 Mod 2 3 3 1 Div Mod 11 1 11 1
Исправь ошибки в программе
Исправьте ошибки в программе Требуется найти сумму 7 целых чисел, которые пол...
Program Summa; Var i, s: integer; x: array [1..7] of integer; begin For i:=1...
S := '987654321'; S1 := Copy ( S, 3, 6); S2 := Copy ( S1, 2, 3); S3:=Insert (...
Высокий «5» Выше среднего «4 +» Удовлетво- рительный «3» Ниже среднего «4 - »...
1 из 15

Описание презентации по отдельным слайдам:

№ слайда 1 Тема: Программирование на Pascal Форма: соревнование в группах Цель урока: вы
Описание слайда:

Тема: Программирование на Pascal Форма: соревнование в группах Цель урока: выявить уровень изученных ЗУН по данной теме урока. Задачи: Знать базовые понятия программирования Ликвидировать неосмысленность материала Воспитывать целеустремленность, толерантность.

№ слайда 2 Length Var Circle Integer While Begin String Rectangle Program Real For i:=1
Описание слайда:

Length Var Circle Integer While Begin String Rectangle Program Real For i:=1 Repeat Uses Graph Array If …Then Read Write Arc 1 2 3

№ слайда 3 Посчитайте G при x=123, y=-247, z=-7569 В программе Pascal
Описание слайда:

Посчитайте G при x=123, y=-247, z=-7569 В программе Pascal

№ слайда 4 G= program Formyla; var x,y,z:integer; g:real; begin x:=123;y:=-247; z:=-7569
Описание слайда:

G= program Formyla; var x,y,z:integer; g:real; begin x:=123;y:=-247; z:=-7569; g:=Sqrt(4*x*Sqr(x)+5*Sqr(y))/Abs(7.5*x*y+z)+x*Sqr(x)*Sqr(x); writeln (g); end. -1911714228.98818

№ слайда 5 Откройте программу PowerPoint, запишите операторы Открыть цикл с параметром о
Описание слайда:

Откройте программу PowerPoint, запишите операторы Открыть цикл с параметром от 1 до N Вывести сообщение: Площадь круга равна 40 кв.см Квадрат размером 60*60 Если Х≥У то А=Х-У иначе А=У-Х Описать массив от 1 до 15 элемента целых чисел с именем К Открыть цикл с предусловием пока Х<100 повторять Х+10 Часть окружности

№ слайда 6 For x:=1 to N do Write (‘Площадь круга равна’, S, ‘кв.см’); Rectangle (100, 1
Описание слайда:

For x:=1 to N do Write (‘Площадь круга равна’, S, ‘кв.см’); Rectangle (100, 110, 160, 170); If X>=Y Then A:=X-Y else A:=Y-X; Var K : array[1..N] of integer; While X<100 do X:=X+10; Arc (100,100, 50, 270, 90);

№ слайда 7 18 Div 5 19 Mod 6 30 Div 4 33 Div 3 27 Mod 7 42 Mod 5 1 3 1 Div Mod 7 6 11 2
Описание слайда:

18 Div 5 19 Mod 6 30 Div 4 33 Div 3 27 Mod 7 42 Mod 5 1 3 1 Div Mod 7 6 11 2

№ слайда 8 20 Div 6 21 Mod 5 23 Div 3 44 Div 4 46 Mod 8 37 Mod 5 2 3 1 Div Mod 7 6 11 2
Описание слайда:

20 Div 6 21 Mod 5 23 Div 3 44 Div 4 46 Mod 8 37 Mod 5 2 3 1 Div Mod 7 6 11 2

№ слайда 9 21 Div 9 21 Mod 4 34 Div 3 77 Div 7 49 Mod 8 17 Mod 2 3 3 1 Div Mod 11 1 11 1
Описание слайда:

21 Div 9 21 Mod 4 34 Div 3 77 Div 7 49 Mod 8 17 Mod 2 3 3 1 Div Mod 11 1 11 1

№ слайда 10 Исправь ошибки в программе
Описание слайда:

Исправь ошибки в программе

№ слайда 11 Исправьте ошибки в программе Требуется найти сумму 7 целых чисел, которые пол
Описание слайда:

Исправьте ошибки в программе Требуется найти сумму 7 целых чисел, которые пользователь введёт сам через клавиатуру.

№ слайда 12 Program Summa; Var i, s: integer; x: array [1..7] of integer; begin For i:=1
Описание слайда:

Program Summa; Var i, s: integer; x: array [1..7] of integer; begin For i:=1 to 7 do Begin Read (x[ i ]); S:=S+ x [i]; End; write ('Сумма =', S); end. Требуется найти сумму 7 целых чисел, которые пользователь введёт сам через клавиатуру.

№ слайда 13 S := &#039;987654321&#039;; S1 := Copy ( S, 3, 6); S2 := Copy ( S1, 2, 3); S3:=Insert (
Описание слайда:

S := '987654321'; S1 := Copy ( S, 3, 6); S2 := Copy ( S1, 2, 3); S3:=Insert ( 'ABC', S2, 3); S4:=Delete ( S3, 2, 4); 765432 654 65ABC4 64

№ слайда 14 Высокий «5» Выше среднего «4 +» Удовлетво- рительный «3» Ниже среднего «4 - »
Описание слайда:

Высокий «5» Выше среднего «4 +» Удовлетво- рительный «3» Ниже среднего «4 - » Средний «4»

№ слайда 15
Описание слайда:

Самые низкие цены на курсы профессиональной переподготовки и повышения квалификации!

Предлагаем учителям воспользоваться 50% скидкой при обучении по программам профессиональной переподготовки.

После окончания обучения выдаётся диплом о профессиональной переподготовке установленного образца (признаётся при прохождении аттестации по всей России).

Обучение проходит заочно прямо на сайте проекта "Инфоурок".

Начало обучения ближайших групп: 18 января и 25 января. Оплата возможна в беспроцентную рассрочку (20% в начале обучения и 80% в конце обучения)!

Подайте заявку на интересующий Вас курс сейчас: https://infourok.ru/kursy

Краткое описание документа:

Презентация содержит некоторый обобщающий материал по теме "Программирование на языке Pascal".Урок носит соревновательный характер, который позволяет учащимся максимально проявить свои знания и умения по данной теме.Задания способствуют активизации мыслительной деятельности каждого ученика.Так как материал сложный, выбрана работа в группах, которая позволяет учащимся осмыслить и закрепить данную тему, получить ответы от своих товарищей на возникшие вопросы.Учитель выступает в роли ведущего координатора. В конце урока учащиеся проводят самоанализ работы в группе и группа выставляет оценку за урок.

Автор
Дата добавления 18.03.2015
Раздел Другое
Подраздел Презентации
Просмотров234
Номер материала 448037
Получить свидетельство о публикации

УЖЕ ЧЕРЕЗ 10 МИНУТ ВЫ МОЖЕТЕ ПОЛУЧИТЬ ДИПЛОМ

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

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

Список всех тестов можно посмотреть тут - https://infourok.ru/tests

Похожие материалы

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