Ребята, помогите, очень важно.
Пользователь вводит целое число x. Если число положительное – выполняется расчёт x4, если отрицательное x3. Используется только одна подпрограмма-функция паскаль.
Ответы
Ответ дал:
0
program p;
var x: integer;
begin
writeln("Введите число: ");
readln(x);
if x>0 then x:=x*4 else x:=x*3;
writeln("Ответ: ",x); readln; end.
Похожие вопросы
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад