Регистрация
supgrigori
31.05.2020 14:54
Информатика
Есть ответ 👍

Даны числа a и b. если оба отрицательные, то возвести каждое в квадрат иначе, увеличить на 100. p.s. программа pascal

175
195
Посмотреть ответы 2

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

qahhor
qahhor
4,5(36 оценок)
Var a, b: real; begin readln (a,b); if (a< 0) and (b< 0) then begin a: =sqr(a); b: =sqr(b); writeln (a,' ',b); end; else begin a: =100*a; b: =100*b; writeln (a,' ',b); end; end.
Alinka04111
Alinka04111
4,5(46 оценок)
1) электронная почта 2)outlook express 3)имя пользователя 4)название домена

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