Pascal ABC

Мальчик купил в магазине a ручек по цене b рублей за ручку. Составьте программу, определяющую, сколько денег потратил мальчик. Значения a и b введите с клавиатуры.

Пример ввода:

3 5

Пример вывода:

Мальчик потратил 15 рублей

Question

Информатика

Нюраша

23 января, 20:10

Pascal ABC

Мальчик купил в магазине a ручек по цене b рублей за ручку. Составьте программу, определяющую, сколько денег потратил мальчик. Значения a и b введите с клавиатуры.

Пример ввода:

3 5

Пример вывода:

Мальчик потратил 15 рублей

+1

Ответы (1)

Знаете ответ?

Маркел · Answer 1

Program Program1;

Var

a:integer;

b, sum:real;

begin

write ('Введите кол-во ручек: ') ;

readln (a) ;

write ('Введите цену за ручку: ') ;

readln (b) ;

sum:=a*b;

writeln ('Мальчик потратил '+floattostr (sum) + ' руб.') ;

end.