Это определение слова система
1-1000 0001 0111
2-<span>0110 0110 0001
3-</span><span>0100 0100 1001</span>
function f(x: integer): integer;
begin
f := 3 * x * x + 4 * x - 5;
end;
begin
write(f(4) + f(-5))
end.
Канада, Бразилия, Япония - морские державы
Канада, Бразилия, США - страны Западного полушария (страны Северной и Южной Америки)
Канада, Мексика, США - страны Северной Америки
Амазонка, Енисей, Нил - крупнейшие реки мира
Волга, Амур, Иртыш - реки России
Лаура, Эльба, Висла - реки Европы
Принтер, монитор, клавиатура - устройства ПК
Клавиатура, сканер, мышь - устройства ввода
Берёза, жасмин, ромашка - растения
Яблоня, груша, вишня - плодовые культуры
Program lol_kek_4ebyrek;
var x, y:integer;
begin
writeln('Формула: y=x^2');
for x:=1 to 10 do
begin
y:=x*x;
writeln('При x=',x,' y=',y);
end;
end.