1) var x, y: integer;
2) doubel у = -2.7*3+0.23*2-1.4;
3) program prog;
uses crt;
begin
writeln('Унылая пора! Очей очарованье!');
writeln('Приятна мне твоя прощальная краса –');
writeln('Люблю я пышное природы увяданье,');
writeln('В багрец и золото одетые леса.');
writeln(' А. С. Пушкин');
end.
Объяснение:
