Вывести все двухзначные положительнык числа, кратные 5
10-11 класс
|
begin
var x := 10;
while x < 100 do
begin
writeln(x:3);
x += 5;
end;
end.
program del5;
var
x : integer;
begin
Сlrscr;
x:=10
while x<100 do
begin
writeln(x);
x:=x+5;
end
end.
Другие вопросы из категории
Читайте также
Ввод
В первой строке находится единственное число N.
Вывод
Каждое выражение выводится в отдельной строке.
Ограничения
1 ≤ N ≤ 14, N - четное.
Вывести все правильные скобочные выражения длиной N, состоящие из круглых и квадратных скобок.
Ввод
В первой строке находится единственное число N.
Вывод
Каждое выражение выводится в отдельной строке.
Ограничения
1 ≤ N ≤ 14, N - четное.
2)Составьте программу которая выводит на экран числа кратные 2 и 13 в диапазоне от 2 до 150
3)Дано вещественное число А и целое число N(>0).Испульзуя один цикл вывести все целые степени числа А от 1 до N
------------------------ОПЕРАТОР WHILE