Регистрация
gagarinov51
25.08.2021 08:04
Информатика
Есть ответ 👍

Сделать на паскале.переделать на постусловие. program zadacha_6; var x,y: real; begin x: =2; y: =2; while x< =42 do while y< =40 do begin y: =y+2/sqrt(x); x: =x+2; end; writeln(y); end.

220
344
Посмотреть ответы 2

Ответы на вопрос:

юська3
юська3
4,5(68 оценок)
Program zadacha_6; var   x,y: real; begin   x: =2;   y: =2;   repeat       repeat           y: =y+2/sqrt(x);           x: =x+2       until y> 40   until x> 42;   writeln(y) end.
tcalala
tcalala
4,8(10 оценок)
Отдел +; использует вывод из ""; пост   h = 0.1;   a = 0;   b = 1; пер   x: вещ; указ   x : = a;   повторять     вывод.чвещ("%.8f^", x * x, 0, 0, 0);     x : = x + h   до x > b кон .

Популярно: Информатика