Предмет: Информатика,
автор: Unicorn074
ребят, помогите, пожалуйста!!!
информатика 8 класс
напишите программу "Сумма чисел от 10 до 20 с шагом 0,1" в Паскале . Заранее благодарю
Unicorn074:
ПОЖАЛУЙСТА
ОЧЕНЬ ВАЖНО
begin
SeqGen(101,10.0, x -> x+0.1).Sum.Println
end.
SeqGen(101,10.0, x -> x+0.1).Sum.Println
end.
Ответы
Автор ответа:
2
Ответ:
Объяснение:
var
a:real = 10;
b:real = 10;
begin
while b < 20 do
begin
b:= b + 0.1;
a:= a + b;
end;
write(a);
end.
СПАСИИИБО
Похожие вопросы
Предмет: Українська мова,
автор: Onel
Предмет: Русский язык,
автор: OOee124
Предмет: Английский язык,
автор: ymomoto
Предмет: Математика,
автор: 54338