Очень Составьте алгоритм решения следующей задачи. Найти все равновеликие прямоугольники, стороны которых выражены целыми числами a и b ,а площадь равна s (а и b принадлежат интервалу от 1 до 20, а s вводится с клавиатуры) ​

VikaKhudyakova VikaKhudyakova    1   26.02.2020 14:37    3

Ответы
victoria6178 victoria6178  11.10.2020 13:41

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика