Integer29. Даны целые положительные числа $$A$$, $$B$$, $$C$$. На прямоугольнике размера $$A*B$$ размещено максимально возможное количество квадратов со стороной C (без наложений). Найти количество квадратов, размещенных на прямоугольнике, а также площадь незанятой части прямоугольника.
Решение:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
program Integer29; var A,B,C,Num,S: Integer; begin Write('Введите целое число A: '); Readln(A); Write('Введите целое число B: '); Readln(B); Write('Введите целое число C: '); Readln(C); Num:=(A div C)*(B div C); Writeln('На прямоугольнике можно разместить ',Num,' квадратов'); S:=A*B-Num*sqr(C); Writeln('Не занятая площадь прямоугольника равна ',S); end. |
Другие задачи из раздела Integer можно посмотреть здесь.
Комментарии: