Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
паскаль, одномерный массив
var a: array [1..6] of integer; i, max: integer;
begin
for i: =1 to 6 do read(a[i]);
max: =a[1];
for i: =1 to 6 do
if a[i]> max then max: =a[i];
writeln(max); readln; end.
11000 (2) = 30 (8) = 18 (16) = 24 (10)
100111 (2) = 47 (8) = 27 (16) = 39 (10)
10100011 (2) = 243 (8) = а3 (16) = 163 (10)
101010101010 (2) = 5252 (8) = (16) = 2730 (10)
Популярные вопросы