1. увеличится на 88.
39*8= 312
28*8=224
312-224=88
Uses crt;
var a,p:integer;b,s:real;
begin
writeln ('введите периметр',p);
readln (p);
writeln ('введите длину',a);
readln (a);
b:=((2*a-p)/-2);
s:=a*b;
writeln (s);
End.
Смешанное:оркестр,библиотека
природное:болото,вулкан,степь
техника:самолёт
удачи
1 рис. передача информации ; пример - просмотр телепередач
2 рис.обмен информацией; пример - разговор по телефону
3 рис.хранение информации; пример - запись номера телефона в записную книжку
4 рис.получение информации; пример - прослушивание аудиоурока
Var a: integer;
begin
readln(a);
a := a * a;
writeln(a);
end.