profile
Опубликовано 6 лет назад по предмету Информатика от Joey14

Ребята, помогите, очень важно.

Пользователь вводит целое число x. Если число положительное – выполняется расчёт x4, если отрицательное x3. Используется только одна подпрограмма-функция паскаль.

  1. Ответ
    Ответ дан vovabor1997

    program p;

    var x: integer;

    begin

    writeln("Введите число: ");

    readln(x);

    if x>0 then x:=x*4 else x:=x*3;

    writeln("Ответ: ",x); readln; end.

Самые новые вопросы