Юным программистам 15 баллов

Ответ: Написаны программы на PascalABC.NET

1)

begin

 var (x,y):=readinteger2('Введите x,y');

 writeln((x+y)*2);

 writeln(x-y);

 writeln(x*y);

 writeln(x/y);

end.

2)

begin

 var (a,b):= readreal2;

 var (q,w,e) := readinteger3;

end. //В чем логика данного задания, она просит числа, и все...нет не вывода и операций!?