числа 2 от 21 до 210.
N:= 2;
for k:=1 to 10
dobegin
writeln(N);
N:= N*2
end;
k:=1 to 10
Разделы презентаций
- Разное
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Медицина
- Менеджмент
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, картинки для презентаций
- Экология
- Экономика
- Юриспруденция
Решение задач с циклом со счетчиком
Содержание
Задача. Найти сумму чисел от 1 до 1000.var sum, i: integer;...sum:= 0;for i:=1 to 1000 do sum:= sum + i;Задача. Вывести квадраты чисел от 10 до 1 по убыванию.for k:=10 downto
Слайды и текст этой презентации
Слайд 1Решение задач с циклом со счетчиком
Задача. Вывести на экран степени
числа 2 от 21 до 210.
dobegin
writeln(N);
N:= N*2
end;
Слайд 2Задача. Найти сумму чисел от 1 до 1000.
var sum, i:
integer;
...
sum:= 0;
for i:=1 to 1000 do
sum:= sum + i;
Задача.
Вывести квадраты чисел от 10 до 1 по убыванию.for k:=10 downto 1 do
writeln(k*k);
шаг «–1»
downto
Решение задач с циклом со счетчиком
Слайд 3Задача. Найти сумму чётных чисел от 2 до 1000.
sum:= 0;
for
i:=1 to 1000 do
if i mod 2 = 0
thensum:= sum + i;
sum:= 0;
k:= 2;
for i:=1 to 500 do begin
sum:= sum + k;
k:= k + 2
end;
вспомогательная переменная
всего 500 чисел
2, 4, 6, …
Решение задач с циклом со счетчиком
Слайд 4Составить программу для решения задачи:
Ипполит задумал трёхзначное число, которое при
делении на 15 даёт в остатке 11, а при делении
на 11 даёт в остатке 9. Напишите программу, которая находит все такие числа.
