А) .txt - обыкновенный текстовый формат. Является.
B) .odt - текстовый документ программы OpenOffice. Является.
C) .rtf - формат обмена документами Above и Microsoft. Является.
Методом исключения выбираем ответ : D).
объём информации содержит 1500 байт.
Var
A,B:integer;
Begin
Write('Введите два числа: ');ReadLn(A,B);
if A<B then Write(A)
else Write(B)
End.
Ответ:
program z_1;
var x,y,z,k: integer;
s:real;
begin
k:=0;
read(x,y,z);
s:=((x*2)+(y*3)+(z*4))/(x+z+y);
while s < 4 do
begin
k:=k+1;
s:=((x*2)+(y*3)+(z*4)+(k*5))/(x+z+y+k);
if s >= 3.5 then break;
end;
writeln(k)
end.
Объяснение:
пхах, тоже олимпиада))