profile

Опубликовано 5 лет назад по предмету Информатика от aigamiMAks

ДАЮ 95 БАЛЛОВ!
Составьте решение задачи в паскале!
Дано целое число. Если оно положительное, то утроить его;
если отрицательное, то прибавить к нему 3;
если нулевое, то заменить его на 5.
Вывести полученное число

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

    Pascal

    Program If3;

    Var

    A:Integer;

    Begin

    WriteLn('Введите число: ');

    ReadLn(A);

    If A > 0 Then

    WriteLn(A * 3)

    Else

    If A < 0 Then

    WriteLn(A + 3)

    Else

    WriteLn(5);

    End.

Войдите или зарегистрируйтесь, чтобы добавить ответ или свой вопрос на сайт


Другие вопросы
Артур Альбертович Батманов
Английский язык - 1 неделя назад

Можете помочь нужен рассказ на английском что моя мама работает на валберис

sasha
Физика - 1 неделя назад

Рассчитай растояние от поверхности земли, на котором сила притяжения, действующая на тело будет 5,5 раз меньшле чем на поверхности земнли. радиус земли прнять равным 6400 помогите!!!!!!!!!!!

Hilzon
Физика - 2 недели назад

Какое количество теплоты потребуется чтобы расплавить 100 г льда взятого при температуре -5 а затем полученую воду нагреть до 20 градусов.

Hilzon
Физика - 2 недели назад

Сколько дров необходимо для того чтобы нагреть 50 л воды в стальном котле массой 10 кг от 15 градусов до 65 градусов? потерями тепла пренебречь.

Hilzon
Физика - 2 недели назад

Какое количество теплоты понадобится для того, чтобы в алюминиевом чайнике массой 700г вскипятьть 2кг воды? начальная температура воды 20 градусов. помогите пожалуйса решить задачу


Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.