Question

Помогите дайте ответы если есть из самого Сора

Answer 1

1) var  a,b,c,d:real;beginwriteln('Введите температуру в месяце Июнь: ');readln(a);writeln('Введите температуру в месяце Июль: ');readln(b);writeln('Введите температуру в месяце Август: ');readln(c);d:=(a+b+c)/3;writeln('Средняя температура за летний период: ',d)end.

2) var  a,b,c,p:integer;beginwriteln('Введите сторону a: ');readln(a);writeln('Введите сторону b: ');readln(b);writeln('Введите сторону c: ');readln(c);p:=a+b+c;writeln('Периметр треугольника = ',p);end.