Помогите, пожалуйста!!! Очень срочно
Составьте алгоритм решения следующей задачи. Найти все равновеликие прямоугольники, стороны которых выражены целыми числами a и b ,а площадь равна s (а и b принадлежат интервалу от 1 до 20, а s вводится с клавиатуры)
Составьте алгоритм решения следующей задачи. Найти все равновеликие прямоугольники, стороны которых выражены целыми числами a и b ,а площадь равна s (а и b принадлежат интервалу от 1 до 20, а s вводится с клавиатуры)
More Questions From This User See All
Answers & Comments
Ответ:
program z1640023;
var a,s:integer;
begin
writeln('Введите s=');
readln(s);
for a:=1 to 20 do
if s mod a=0
then writeln('a=',a,' b=',s div a);
end.