Регистрация
Luxky
15.01.2020 03:43
Информатика
Есть ответ 👍

Нужно составить программу паскаль с for вывести на экран 1000; 900; ..; 100

274
396
Посмотреть ответы 3

Ответы на вопрос:

magomed200495
magomed200495
4,6(37 оценок)
// нужно составить программу паскаль с for вывести на экран 1000; 900; ..; 100  var i,x: word; begin     for i: =1000 downto 100  do //если вместо слова to в цикле for поставить downto, то после выполнения каждого шага цикла переменная-счетчик будет не увеличиваться, а уменьшаться на единицу       begin             x: = i mod 100;             if x=0 then writeln (i);         end; end.
даниля3
даниля3
4,7(1 оценок)
Var     i,a : integer; begin a : = 1100; for i : = 1 to 10 do   begin   a : = a -100;   writeln (a); // write (a,';   '); end; end.
sxpidxoznitsxa
sxpidxoznitsxa
4,4(19 оценок)
52, но если в конце точка, то 53

Популярно: Информатика