Задать вопрос
29 декабря, 02:02

Написать программу на паскале

Если данное число х меньше нуля, то Z присвоить значение большего из 2 чисел х и у, иначе Z присвойте значение полсуммы этих чисел.

+5
Ответы (1)
  1. 29 декабря, 02:37
    0
    Program Z;

    Uses Crt;

    var x, y, z:real;

    begin

    clrscr;

    write ('Введите х: ') ;

    readln (x) ;

    write ('Введите y: ') ;

    readln (y) ;

    if (xy) then z:=x;

    if (x<0) and (x
    if (x>=0) then z: = (x+y) / 2;

    writeln ('z=', z) ;

    readkey;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Написать программу на паскале Если данное число х меньше нуля, то Z присвоить значение большего из 2 чисел х и у, иначе Z присвойте ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Дан алгоритм: Начало Присвоить a значение 1 Присвоить b значение 1 Присвоить c значение 0 Пока a меньше чем 1001 Начало цикла Присвоить b значение b * a Присвоить a значение a + 1 Конец цикла Пока b делится на 6 Начало цикла Присвоить c значение c +
Ответы (1)
Помогите написать в паскале! Ввести три целых числа x, y, z. Если хотя бы одно из них четное, то первому четному числу присвоить значение произведения этих чисел.
Ответы (1)
Помогите написать программу в паскале и подробно описать Присвойте z значение большего из x и y в том случае если x=0
Ответы (1)
1 какие значения примут переменные х и у после выполнения последовательности команд? х=3 у=3 х=у у=х+2. 2. Объявите переменные Х, У и Z. Присвойте переменной Х значение 10, переменной У значение 15. Присвойте переменной Z сумму Х и У.
Ответы (1)
Решите в программе Паскаль: даны числа a, b, если остаток при целочисленном деление равен 0. Число а присвоить частное от деление, а иначе число А присвоить произведение чисел А и B
Ответы (1)