Предмет: Информатика, автор: taku1992

Составьте программу к задаче : Вывести 20 первых чисел так чтобы каждое последующее было на меньше предыдущего . Первое число 25


elenaklon: На сколько меньше?
taku1992: на 1

Ответы

Автор ответа: elenaklon
0
var i:integer;
begin
for i:=25 downto 6 do writeln(i)
end.

taku1992: это правильно? Почему down 6?
elenaklon: to - у
elenaklon: downto - уменьшает переменную на 1
elenaklon: to - увеличивает переменную на 1
elenaklon: при использовании цикла с заданным числом повторений (for)
elenaklon: количество повторений ( циклов) считается 25-6+1 =20 (так как надо 20 чисел)
Похожие вопросы
Предмет: История, автор: wwe2724dj