Предмет: Информатика,
автор: sashayt21
Информатика 8-й класс надо решить пример по паскалю оператору цикла: найти сумму чисел 2+4+6+8+10...+100
Ответы
Автор ответа:
1
var a,i:integer;
begin
while i<100 do begin
a:=a+i;
i:=i+2;
end;
write(a);
end.
изи
begin
while i<100 do begin
a:=a+i;
i:=i+2;
end;
write(a);
end.
изи
sashayt21:
Хорошо модно еще 1? Найти сумму чисел 0.1+0.2+0.3...+2.5
var a,i:real;
begin
while i<2.5 do begin
a:=a+i;
i:=i+0.1;
end;
write(a);
end.
begin
while i<2.5 do begin
a:=a+i;
i:=i+0.1;
end;
write(a);
end.
во
Спасибки огромное!
Похожие вопросы
Предмет: Английский язык,
автор: Julinkab
Предмет: Математика,
автор: andriysviatenko1505
Предмет: Русский язык,
автор: Kurban1973
Предмет: Литература,
автор: nssds
Предмет: Математика,
автор: яна1144