Предмет: Информатика,
автор: yznay
Програмирование
.Паскаль.Цикл
Корень3+корень6+корень9+...корень3n
Помогите пожалуйста
Надо написать программу
Ответы
Автор ответа:
0
//Pascal ABC.NET v3.1 сборка 1172
Var
i,n:integer;
r:real;
begin
readln(n);
for i:=1 to n do
r:=r+sqrt(3*i);
writeln(r);
end.
Пример ввода:
3
Пример вывода:
7.18154055035206
Var
i,n:integer;
r:real;
begin
readln(n);
for i:=1 to n do
r:=r+sqrt(3*i);
writeln(r);
end.
Пример ввода:
3
Пример вывода:
7.18154055035206
Похожие вопросы
Предмет: Информатика,
автор: lenovo643dregmailcom
Предмет: Алгебра,
автор: ArtemKickov
Предмет: Информатика,
автор: Jogrry
Предмет: Математика,
автор: pcherenkova
Предмет: Математика,
автор: natalyanatalvnatalya