Предмет:
ИнформатикаАвтор:
rainenphzprogram pr1;
var z,x,v: integer;
begin
writeln('Ведите число');
readln(z);
if z>=0 then x:=z*2 and wreteln(z' Оно отрицательно ' x);
if z<0 then v:=z-10 and wreteln (z ' Оно положительно ' v );
end.
Автор:
amayacunninghamДобавить свой ответ
Предмет:
Беларуская моваАвтор:
blancoivftОтветов:
Смотреть
Предмет:
Русский языкАвтор:
francespeckОтветов:
Смотреть
Предмет:
Другие предметыАвтор:
meganrichОтветов:
Смотреть