
Борис
6 год назад
Помогите пожалуйста сделать, заранее спасибо!
Имеется четыре произвольных числа(ABCD). Составить программу на алгоритм чеком языке програмирования, анализирующую эти числа и отвечающую на вопрос: правда ли, что последнее число самое большое?
ОТВЕТЫ

Mesa
Jul 7, 2019
Program one;
Uses CRT;
Var a,b,c,d:real;
If (bgt;a) and (bgt;c) and (bgt;d) then writeln(последнее число большее);
Else writeln(последнее число не самое большое);
End.
Uses CRT;
Var a,b,c,d:real;
If (bgt;a) and (bgt;c) and (bgt;d) then writeln(последнее число большее);
Else writeln(последнее число не самое большое);
End.
266