Напишите программу определяющую сумму всех чисел от 1 до 100. s: =s+x

kirillfox99ozbdp8 kirillfox99ozbdp8    1   12.09.2019 08:50    0

Ответы
Gubaeva5 Gubaeva5  07.10.2020 09:17
//Pascal
var S, x: integer;
begin
S := 0;
for x := 1 to 100 do S := S + x;
writeln(S); 
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика