Помогите пожалуйста зделать задание по информатике
Номер 12 и 13
Приложения:
degdmitry:
Pascal?
Да
Ответы
Ответ дал:
1
12.
а=5
13.
begin
var
x:integer;
readln (x);
if x<0 then y:=-1;
if x=0 then y:=0;
if x>0 then y:=1;
end.
а=5
13.
begin
var
x:integer;
readln (x);
if x<0 then y:=-1;
if x=0 then y:=0;
if x>0 then y:=1;
end.
А 13
А 11 мне не надо
Не правильно указал номер задания, прости.
Также переделал код в задании 13, теперь он полностью правильный.
Похожие вопросы
1 год назад
1 год назад
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад