Регистрация
полина10092003
22.09.2022 22:32
Информатика
Есть ответ 👍

КЛАСС ИНФА
напишите программу, которая выведет на экран все числа из промежутка [50;100]​

172
398
Посмотреть ответы 2

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

zora3
zora3
4,8(48 оценок)

Объяснение:

var

i:integer;

begin

for i:=50 to 100 do write(i);

end.

Ch3l0vek
Ch3l0vek
4,6(79 оценок)
//pascal abc.net v3.1 сборка 1219 const   n=5;   var   ar: array[1..n] of integer;   i,k: integer; begin   for i: =1 to n do   begin     readln(ar[i]);     if ar[i]> 0 then k: =k+ar[i];   end;   writeln('array: ');   for i: =1 to n do   write(ar[i]: 4);   writeln;   write('res: ',k); end. пример ввода: -1 -2 1 2 0 пример вывода: array:   -1   -2   1   2   0 res: 3

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