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

Определить чётность каждого из натуральных чисел x, y, z программа

Вроде программа на Паскаль, срочно нужно!!!

Спасибо большое, вознаграждение 45 б!!!

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

    var x,y,z: integer;

    begin

    readln(x,y,z);

    if x mod 2=0

    then writeln(x,'-четное') else writeln(x,'-нечетное');

    if y mod 2=0

    then writeln(y,'-четное') else writeln(y,'-нечетное');

    if z mod 2=0

    then writeln(z,'-четное') else writeln(z,'-нечетное');

    end.

    Пример:

    15 42 93

    15-нечетное

    42-четное

    93-нечетное

    1. Ответ
      Ответ дан hrantayvazyan2003
      Спасибо огромное )))
Самые новые вопросы