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

Записать программный алгоритм наибольшего значения из трех.

  1. Ответ
    Ответ дан preceptor
    Program Max;
    Var a, b, c: Integer;
    Begin
    Write('a = ');
    ReadLn(a);
    Write('b = ');
    ReadLn(b);
    Write('c = ');
    ReadLn(c);
    If(a > b) Then
    Begin
    If(a > c) Then
    WriteLn(a)
    Else
    WriteLn(c);
    End
    Else If(b > c) Then
    WriteLn(b)
    Else
    WriteLn(c);
    ReadLn;
    End.