Задать вопрос
2 марта, 18:52

Начали писать программы в Паскаль, и надо как то оформить задачу:

Поклейка прямоугольной стены.

Длина стены - a.

Высота - b.

Рулоны 12 (длина) на 1 (ширина)

Цена 1 рул. - k рул.

Нужно узнать на всю стену - ?

+1
Ответы (1)
  1. 2 марта, 19:41
    0
    var a, b, k, i:integer;

    begin

    readln (a, b, k) ;

    if a/12>b then i: = (a div 12) + 1 else i:=b;

    writeln ('Cena - ', k*i) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Начали писать программы в Паскаль, и надо как то оформить задачу: Поклейка прямоугольной стены. Длина стены - a. Высота - b. Рулоны 12 ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы