1-а, 2-в, 3-г, 4-, 5-в, 6-14,7-г, дальше я не бум бум))
1)
program s_parallelogramm;
var
a,h,s: real;
begin
write('Основание = '); readln(a);
write('Высота = '); read(h);
if ((a=0) or (a<0)) or ((h=0) or (h<0)) then writeln('Ошибка! Значения основания и высоты должно быть натуральными числами')
else
begin
s:=a*h;
writeln('Площадь (S) параллелограмма = ', s);
end;
end.
1)http://s.idkn.ru/images/original/7/209408/5510467fe8b70e21098ba08c.jpg
Кукушка кукушонку сшила капюшон
2)пв вжф к ухёв пжф
3)комета
4)?
5)?
заяц или змея.................