Предмет: Информатика,
автор: Vladimir6886
есть алгоритм нужно перевести в систему паскаль
вариант 1
Приложения:
Ответы
Автор ответа:
0
//Pascal
//var 1
var i:integer;
s:real;
begin
readln(s);
for i:=1 to 5 do s:=s+(sqr(s)+i)/i;
writeln(s);
end.
//var 1
var i:integer;
s:real;
begin
readln(s);
for i:=1 to 5 do s:=s+(sqr(s)+i)/i;
writeln(s);
end.
Похожие вопросы
Предмет: Математика,
автор: Аноним
Предмет: Русский язык,
автор: Kek2282011
Предмет: Математика,
автор: bornispolo
Предмет: Химия,
автор: Vagabund97