Начали писать программы в Паскаль…

Question

Начали писать программы в Паскаль, и надо как то оформить задачу: Поклейка прямоугольной стены. Длина стены — a. Высота — b. Рулоны 12 (длина) на 1 (ширина)

Answer 1

41

lion566

20 марта 2023

var a,b,k,i: integer; beginreadln (a,b,k); if a/12>b then i: =(a div 12)+1 else i: =b; writeln ('Cena — ',k*i); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить