Регистрация
Сумасшедшая55555
31.01.2021 15:06
Информатика
Есть ответ 👍

Накладка программы это ...

225
380
Посмотреть ответы 1

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

AlinaLove200413
AlinaLove200413
4,5(53 оценок)
//прога на pascal`e var  a: array [0..6] of shortint : = ( 4, -3, 16, 9, -1, -9, 25); i : byte; begin for i: =0 to 6 do if a[i]> =0 then writeln ('кв. корень из ', a[i], ' = ', sqrt(a[i]), '; '); end.

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