Помогите пожалуйста!! ^^ Номер 1. Запросить число и вывести ** экран квадрат этого числа,...

0 голосов
47 просмотров

Помогите пожалуйста!! ^^
Номер 1.
Запросить число и вывести на экран квадрат этого числа, если оно окажется положительным или модуль этого числа, если оно отрицательно.


Информатика (24 баллов) | 47 просмотров
0

Pascal?

Дан 1 ответ
0 голосов

Код программы на Pascal:

var
  number: integer;
begin
  write('Введите число: ');
  read(number);
  if (number > 0) then
    writeln(number * number)
  else if (number < 0) then
    writeln(-number);
end.

(4.9k баллов)
0

Помоги мне плиз