Question

На складе яблоки хранятся в мешках . Известно количество мешков, а также количество яблок в каждом мешке. составьте программу на языке Паскаля. ​

Answer 1

Программа:

Pascal:

var bag, apple: integer;

begin

 write('Количество мешков: ');  readln(bag);

 write('Количество яблок в мешке: ');  readln(apple);

 writeln('Всего яблок на складе: ', apple * bag);

end.

Результат:

Количество мешков: 15

Количество яблок в мешке: 20

Всего яблок на складе: 300