Составить программу, которая каждое введенное положительное число увеличивает в два раза, а отрицательное возводит в квадрат.

111

455

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

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

Cracolla1

Информатика

4,8(79 оценок)

program z1;

uses crt;

var x,y: integer;

begin

clrscr;

writeln('введи число');

readln(x);

if x> =0 then x: =x*2

else

if x< 0 then sqr(x);

writeln(x);

readln;

end.

katecat20171

Информатика

4,7(25 оценок)

pascal abc

var a : integer; beginreadln(a); if a > = 0 then a : = 2*a; if a < 0 then a : = a*a; writeln(a)end.

Roblox777

Информатика

4,8(38 оценок)

power point — убедительный доклад) — программа подготовки презентаций и просмотра презентаций, являющаяся частью Microsoft Office и доступная в редакциях для операционных систем Microsoft Windows и macOS, а также для мобильных платформ Android и IOS.