Грыжа1
14.09.2021 11:48

балов
С клавиатуры вводится число. Увеличить в три раза, если оно больше нуля. Уменьшить на 4, если оно меньше нуля. pascal abc

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
dkflbvbh1972
08.05.2020 13:30

var a:integer;

begin

read(a);

if a>=0 then a:=a*3

else a:=a-4;

write(a);

Объяснение:

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота