Дано целое число. Если оно является положительным, то прибавить к нему 1; если отрицательным, то вычесть из него 3; если нулевым, то заменить его на 12. Вывести полученное число.
O program zadaca;
var
а: integer;
begin
writeln('Введи число а');
readln(a); ;
if a >=0 then
if a=0 then a:=12 else a:=a+1
else a:=a-3;
end.
O program zadaca;
var
begin
writeln('Введи число а');
readln(a);
If a > 0 then
If аѕ0 then are12 else a:a+1
else a:-a-3;
writeln(a);
readln; ;
end

230

469

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

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

darya666666666666

Информатика

4,5(90 оценок)

если речь про excel то на то

1 верный ли даипазон охватывает формула ячейки,

2 проверить как идёт использование абсолютной адресации, чтобы все значения были верны

150 000+ пользователей

Оформить подписку