Задать вопрос
3 июня, 09:24

Даны числа х, у если х меньше у, то вычислить z=x+y, а если нет, то вычислить z = у+х-3 в обоих случаях вывести на экран содержимое ячеек x, y, z

+5
Ответы (1)
  1. 3 июня, 09:33
    0
    Var

    x, y, z:Integer;

    Begin

    Read (x, y) ;

    if (x
    else z:=y+x-3;

    Writeln (x,' ', y,' ', z) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Даны числа х, у если х меньше у, то вычислить z=x+y, а если нет, то вычислить z = у+х-3 в обоих случаях вывести на экран содержимое ячеек ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
Паскаль. 1. вывести на экран все четные числа от 1 до n. 2. вывести на экран все трехзначные числа. 3. вывести на экран четырехзначные числа оканчивающийся на 7. 4. вывести на экран все трехзначные и двухзначные числа сумма цифр которых равна девяти.
Ответы (1)
Var day:byte; boy:string; pi:real; begin / / В блок памяти boy запишите Ваше имя / / В переменную day запишите Ваш возраст / / Выведите на экран содержимое переменной boy / / Выведите на середину экрана текст "Меня зовут", а рядом - содержимое
Ответы (1)
1) Заполнить массив размером N целыми числами последовательно от 1 до N. Вывести его на экран. Найти сумму элементов массива и вывести ее на экран. 2) Заполнить массив размером N целыми числами последовательно от N до 1. Вывести его на экран.
Ответы (1)
1. for + random a. вывести случайное количество случайных чисел b. вывести на экран 10 случайных чисел c. вывести на экран 10 случайных чисел, значение которых лежит в отрезке [0,10] d.
Ответы (1)
Распредели операции редактирования и форматирования: Изменение ориентации текста в ячейке, изменение цвета шрифта, изменение ширины столбца, объединение ячеек, удаление столбца, установка и изменение границ ячеек, выделение ячеек, выравнивание в
Ответы (1)