Pascal ABC. Подсчитать разность первых 23-х целых положительных чисел. (с счетчиком for ) или топо того
Ответы
Ответ дал:
0
var
i,r:integer;
begin
for i:=1 to 23 do
r:=r-i;
writeln('разность разность первых 23-х целых числе: ',r);
end.
i,r:integer;
begin
for i:=1 to 23 do
r:=r-i;
writeln('разность разность первых 23-х целых числе: ',r);
end.
Ответ дал:
0
Спасибо большое
Похожие вопросы
2 года назад
2 года назад
7 лет назад
10 лет назад