Стандартные задачи на циклы: различия между версиями
Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
UnREAL (обсуждение | вклад) Нет описания правки |
UnREAL (обсуждение | вклад) Нет описания правки |
||
| Строка 6: | Строка 6: | ||
'''№7. Вывод 10 первых степеней двойки''' | '''№7. Вывод 10 первых степеней двойки''' | ||
<source lang="pascal"> | |||
begin | begin | ||
var x := 2; | var x := 2; | ||
| Строка 15: | Строка 15: | ||
end; | end; | ||
end. | end. | ||
</source> | |||
Ссылка на алгоритм в среде WDE: [http://pascalabc.net/WDE/?shared=UnREAL/Algoritm_07.pas] | Ссылка на алгоритм в среде WDE: [http://pascalabc.net/WDE/?shared=UnREAL/Algoritm_07.pas] | ||
Версия от 22:18, 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.