Числовые типы — типы данных, выражающие число. Притом как целое, так и дробное.
Но НЕ строку, содержащую название или обозначение числа.
Следовательно, подходят только 1; 5; 6.
Остались ненужные нам типы:
4 — логический тип (булевый)
2, 3, 7 — строковый тип (текст)
Ответ: 1; 5; 6
Var naibolwee:int64;
i:integer;
A:array [1..4] of int64;
function max(a,b:int64):int64;
begin
if a>b then max:=a else max:=b;
end;
begin
for i:=1 to 4 do
read(A[i]);
for i:=1 to 3 do
naibolwee:=max(A[i],A[i+1]);
writeln(naibolwee);
<span>end.</span>
<span>OS/2, AmigaOS, Mac OS, Solaris, Linux и UNIX, Windows, </span><span>Novell.</span>
//правильно вот так:
Program al;
var c: real;
begin
c:=4.75;
writeln('c=',c);
end.
Const
s='вернисаж';
begin
Writeln(s[3]+copy(s,1,2)+Copy(s,4,2)+s[2]);
Writeln(Copy(s,6,3)+s[7]);
Writeln(s[4]+Copy(s,2,2)+s[1])
end.
<em><u>Результат выполнения программы:</u></em>
рвение
сажа
нерв