Срочно! Решить в паскаль при помощи цикла while y: =√ (1+√4+√9…

Question

Срочно! Решить в паскаль при помощи цикла while y: =√ (1+√4+√9… +√36+√49)

Answer 1

90

nbveh88

19 февраля 2023

Var x: integer, y: realBEGINx: =1; y: =0; while x <= 7 dobeginy: =y+sqrt (x*x); x: =x+1; end; y: =sqrt (y); writeln (y); END. Но вообще-то по-нормальному y=√ (1+2+… +6+7) И решается намного проще.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: