Предмет: Информатика,
автор: З1в1е1д1а
Написать программу для нахождения суммы чисел от одной десятой до 1. (Паскаль)
Ответы
Автор ответа:
0
var
i:integer;
s:real;
begin
s:=0;
for i:=1 to 10 do s:=s+i/10;
Writeln(s)
end.
Результат
5.5
i:integer;
s:real;
begin
s:=0;
for i:=1 to 10 do s:=s+i/10;
Writeln(s)
end.
Результат
5.5
Похожие вопросы
Предмет: Математика,
автор: govno56govno
Предмет: Геометрия,
автор: maksimcelnokov7
Предмет: Физкультура и спорт,
автор: alexandrahohlova1987
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: Gylziya1983