Program n1;
var i, n : integer;
begin
for i:=1 to n do writeln (n)
end.
1. a = 14; b = 42 ( см. вложение 1 )
2. x = 2; y = 5; t = 5 ( см. вложение 2 )
3. a = 3; b = 12 ( см. вложение 3 )
4. x = 42; y = 2 ( см. вложение 4 )
А интернет для чего тебе? Это же лёгкие вопросы!
Листва, ветки, крона, корни,ствол