Регистрация
mariyburova2001
04.01.2022 16:38
Информатика
Есть ответ 👍

Составить программу для решения . ввести любое число с клавиатуры. найти его квадрат, если число отрицательное, в противном случае найти квадратный корень.

101
424
Посмотреть ответы 3

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

You1236
You1236
4,4(5 оценок)
Var n,j: real; begin writeln('введите число'); readln(n); if n < 0 then j: =n*n else j: =sqrt(n); writeln(j); end.
Горова2007
Горова2007
4,6(48 оценок)
Program asd; uses crt; var a,b,s: real; begin clrscr; writeln('vvedite chislo: '); readln(a); if a< 0 then   s: =sqr(a)  else s: =sqrt(a);   writeln(s); end.
настя123настя1
настя123настя1
4,5(64 оценок)

ответ:

комп попробуй перезагрузить

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