Написать программу на языке Pascal, которая вычисляет площадь прямоугольника по двум сторонам a и b, введенным с клавиатуры.

Ответы

Ответ дал: xovonoone

Ответ:

Program_z1;

var a,b,s:integer;

begin

writeln('Введите стороны прямоугольника');

read(a,b);

s:=a*b;

wrireln('Площадь треугольника равна', s);

end.

Объяснение:

zhoramalushevpegkpk: Можно поступить проще, обойтись без лишней переменной. Program в заголовке PABC.NET не обязателен, а сторонам A и B можно спокойно присвоить real - отрицательные стороны у прямоугольников не встречаются.

var a,b: real;
begin
write('Введите сторону А: '); readln(a);
write('Введите сторону B: '); readln(b);
write('Площадь прямоугольника АВ = ', a*b);
end.

xovonoone: ну, тогда просто
var a,b:real;
begin
read(a,b);
write(a*b);
end.

Вас заинтересует

Биология

11 месяцев назад

Какая группа водорослей имеет ризоиды и столбик?

Українська мова

11 месяцев назад

Позначити, у якому рядку всі слова — діалектизми: а) пір’я, влітку, прегарний; б) спадщина, лижі, проміння; в) червлений, посуд, батько, потоки; г) каракати, качула, кресаня, легінь.

Русский язык

1 год назад

совсем запуталась , помогите! Нужно определить падеж и окончание СУЩЕСТВИТЕЛЬНЫХ в словосочетаниях ДРЕССИРОВАЛ СЛОНОВ И ОХОТИЛСЯ НА ВОЛКОВ

Русский язык