Задание:
Известна стоимость монитора, системного блока, клавиатуры и мыши. Сколько будут стоить n компьютеров. Написать программу в PoscalABC
Решение:
Простая задача, держи: var a,b,c,d,n,j: integer; beginwriteln ('Стоимость монитора'); readln (a); writeln ('Стоимость системного блока'); readln (b); writeln ('Стоимость клавиатуры'); readln (c); writeln ('Стоимость мышки'); readln (d); writeln ('Сколько компьютеров нужно? '); readln (n); j: =(a+b+c+d)*n; writeln ('Стоимость ', n, ' компьютеров=',j); end.
Знаете другой ответ?