даны два числа. если 1-ое число больше второго то оба числа

Даны два числа. если 1-ое число больше второго то оба числа возвести в квадрат. в противоном случае каждое число прирастить на 100.
Pascal.ABC.NET

Задать свой вопрос
1 ответ

Ответ:

Begin

Read (a,b);

If agt;b then begin

A:=a*a;

B:=b*b;

End

Else begin

A:=100+a;

B:=100+b;

End;

End.

Изъясненье:

, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт