Составьте программу, которая вводит с клавиатуры длину и ширину прямоугольника и определяет, является ли прямоугольник квадратом. Постройте данный прямоугольник (единицу длины показать 10 пикселями).
Составьте программу, которая вводит с клавиатуры длину и ширину прямоугольника и определяет, является ли прямоугольник квадратом. Постройте данный прямоугольник (единицу длины показать 10 пикселями).
Гость
Ответ(ы) на вопрос:
ГостьProgram reshenie;
var a,b:real;
begin
writeln('Введите длину и ширину прямоугольника:'); Readln(a); Readln(b);
if (a=b) then writeln('Прямоугольник является квадратом')
end.
Не нашли ответ?
Похожие вопросы