Задать вопрос
28 мая, 10:08

Дано 4 числа. Если среди них найдется число 999, то напечатать все четыре числа, в противном случае - сумму 2-х последних. построить алгоритм действий

+3
Ответы (2)
  1. 28 мая, 11:36
    0
    Program pr;

    uses crt;

    Var a, b, c, d:real;

    Begin

    Writeln ('vv 4 chisla') ;

    readln (a) ;

    readln (b) ;

    readln (c) ;

    readln (d) ;

    if (a=999) or (b=999) or (c=999) or (d=999) then Writeln ('a=', a,' b=', b,' c=', c,' d=', d)

    else Writeln ('sum=', c+d) ;

    readln;

    end.
  2. 28 мая, 13:59
    0
    пусть те числа - а, б, с, д.

    начало

    если а=999 ИЛИ б=999 ИЛИ с=999 ИЛИ д=999

    начало

    напечатать а, б, с, д

    конец

    иначе

    начало

    присвоить е сумму с и д.

    напечатать е

    конец

    конец
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Дано 4 числа. Если среди них найдется число 999, то напечатать все четыре числа, в противном случае - сумму 2-х последних. построить ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы