
Bonnyan
6 год назад
Пожалуйста посчитайте составить программу на языке паскаль!Составить программу линейной структурыВ квадратной комнате шириной А и высотой В решили поклеить обои.Вычислите площадь стен для оклеивания их обоями.Взарание спасибо.
ОТВЕТЫ

Лука
Oct 24, 2020
program odoi;
var a,b,s: real;
begin
writeln('введите ширину a');
readln(a);
writeln('введите ширину b');
readln(b);
s:=a*b;
writeln('площадь равна s=',s)
end.
var a,b,s: real;
begin
writeln('введите ширину a');
readln(a);
writeln('введите ширину b');
readln(b);
s:=a*b;
writeln('площадь равна s=',s)
end.
142
Смежные вопросы: