• 1.: Составить программу. Ввести 2 числа. Вычесть из большего меньшее.

    Ещё составить блок-схему!

    ____________________________

    2. Составить блок-схему и программу. Условие задачи: Если хотя бы одно из трёх введенных пользователем чисел чётно, вывести слово "да". Иначе - вывести слово "нет".

    ____________________________

    3. Исправить все ошибки в данном фрагменте программы:

    If a>=10 and a<=99 Then

    Writeln (a ‘ двузначное число ’);

    Writeln (‘ его квадрат = ’, Sqrt(a));

    ___________

    Решите пожалуйста что сможете!

Ответы 1

  • program z1;var a,b,c:integer;beginwrite('a=');readln(a);write('b=');readln(b);if a>b then c:=a-b else c:=b-a;writeln('c=',c);end.

     

    program z2;var a,b,c:integer;beginwrite('a=');readln(a);write('b=');readln(b);write('c=');readln(c);if ((a mod 2)=0)or((b mod 2)=0)or((c mod 2)=0)then writeln('четное') else writeln('нечетное');end.

    • Автор:

      evonyn8x6
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years