Создать программу для вычисления площади прямоугольника ( если а> б) или площади треугольника (если б> а) паскаль
Ответы на вопрос
Ответил g0golmogol
1
Для прямоугольника. Площадь прямоугольника равно а*б.
program abc;
var a, b, S:integer;
begin
writeln ('Введите длины двух смежных сторон прямоугольника');
read (a, b);
S:=a*b;
writeln ('Площадь равна ', S);
end.
program abc;
var a, b, S:integer;
begin
writeln ('Введите длины двух смежных сторон прямоугольника');
read (a, b);
S:=a*b;
writeln ('Площадь равна ', S);
end.
Новые вопросы