Стандартные задачи на циклы: различия между версиями
Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
UnREAL (обсуждение | вклад) Нет описания правки |
UnREAL (обсуждение | вклад) Нет описания правки |
||
Строка 5: | Строка 5: | ||
== Рекуррентные соотношения == | == Рекуррентные соотношения == | ||
''' | '''№7. Вывод 10 первых степеней двойки''' | ||
begin | begin | ||
Строка 13: | Строка 13: | ||
writeln(i:2,x:5); | writeln(i:2,x:5); | ||
x *= 2; | x *= 2; | ||
end; | |||
end. | |||
Ссылка на алгоритм в среде WDE: [http://pascalabc.net/WDE/?shared=UnREAL/Algoritm_07.pas] | |||
'''№8. Вывод всех двухзначных чисел, кратных 5''' | |||
begin | |||
var x := 10; | |||
while x < 100 do | |||
begin | |||
writeln(x:3); | |||
x += 5; | |||
end; | end; | ||
end. | end. |
Версия от 22:16, 27 ноября 2010
Простейшие алгоритмы
(в разработке)
Рекуррентные соотношения
№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.