Стандартные задачи на циклы
Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
Простейшие алгоритмы
(в разработке)
Рекуррентные соотношения
№7. Вывод 10 первых степеней двойки
begin
var x := 2;
for var i := 1 to 10 do
begin
writeln(i:2,x:5);
x *= 2;
end;
end.
Ссылка на алгоритм в среде WDE: [1]
№8. Вывод всех двухзначных чисел, кратных 5
begin var x := 10; while x < 100 do begin writeln(x:3); x += 5; end; end.