Разделы презентаций
- Разное
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Медицина
- Менеджмент
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, картинки для презентаций
- Экология
- Экономика
- Юриспруденция
Методическая разработка по теме: Pascal ABC. 8 класс
Содержание
- 1. Методическая разработка по теме: Pascal ABC. 8 класс
- 2. Слайд 2
- 3. Слайд 3
- 4. По известной блок – схеме составь программу на языке Паскаль.
- 5. Слайд 5
- 6. Слайд 6
- 7. Слайд 7
- 8. Задача 1Компьютер в первую секунду печатает на
- 9. Программаprogram z1;vark,x:integer;Begink:=1;x:=1;while x mod 20090 dobegink:=k+1;x:=x+11;end;writeln ('Через ', k, ' секунд');end.
- 10. Задача 2Найдите количество четных цифр в десятичной записи числа n.Входные данные148637130
- 11. program z2;varx, y, k:integer;Beginreadln (x);k:=0;while x0 dobeginy:=x
- 12. Задача 3Выясните, лежат ли на одной прямой точки А(x1, y1), B(x2, y2), C(x3, y3)Входные данные x1=1 y1=1x2=6 y2=3x3=11 y3=5
- 13. Скачать презентанцию
По известной блок – схеме составь программу на языке Паскаль.
Слайды и текст этой презентации
Слайд 9Программа
program z1;
var
k,x:integer;
Begin
k:=1;
x:=1;
while x mod 20090 do
begin
k:=k+1;
x:=x+11;
end;
writeln ('Через ', k, ' секунд');
end.
Слайд 11program z2;
var
x, y, k:integer;
Begin
readln (x);
k:=0;
while x0 do
begin
y:=x mod 10;
if y
mod 2 =0 then k:=k+1;
x:=x div 10;
end;
writeln ('k=',k);
end.
Слайд 12Задача 3
Выясните, лежат ли на одной прямой точки А(x1, y1), B(x2, y2), C(x3, y3)
Входные данные
x1=1 y1=1
x2=6 y2=3
x3=11 y3=5
