rita9
Опубликовано 7 лет назад по предмету Информатика от rita9


найдите пожалуйста ошибку(система паскаль)

 задача:

даны два числа. вывести большее из них.

program zadacha6;

var a,b: real;

begin

readln(a,b);

if a>b then writeln ( ' a bolshe ' ) else writeln ( ' a menshee ' );

end. 

  1. Ответ
    Ответ дан Трудяга

    program zadacha6; var a,b: real; begin readln(a,b); if a>b then writeln (a) else writeln (b); end.

    не? я не уверен

  2. Ответ
    Ответ дан vovazen

    Я бы сделал так....

    program p_1;var a,b: real;beginwriteln ('Vvedite 1-oe');read (a);writeln ('Vvedite 2-oe');read (b);if (a>b) thenbegin writeln ( ' 1-oe bolshe (',a,')' );end;if (a<b) thenbegin writeln ( ' 1-oe menshee. Bolshe vtoroe (',b,')' ); end;if a=b thenbegin writeln ('oni ravni');end; end. 

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц