Ввести два числа. если оба числа равны 5.5, то выдать их на печать, иначе удвоить число не равное 5.5. программу паскаль

Agetnor Agetnor    3   02.08.2019 22:00    0

Ответы
zlatochkagr zlatochkagr  30.09.2020 03:50
Var
    a, b: real;

begin
    readln(a, b);
    if a <> 5.5 then a := a * 2;
    if b <> 5.5 then b := b * 2;
    writeln(a, ' ', b );
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика