Пирожок в столовой стоит a рублей и b копеек. Определите, сколько рублей и копеек нужно...

Question

Пирожок в столовой стоит a рублей и b копеек. Определите, сколько рублей и копеек нужно заплатить за n пирожков. Программа получает на вход три числа: a, b, n и должна вывести два числа: стоимость покупки в рублях и копейках.

Comments

Написать программу в паскале

Answer 1

Var
a,n,b,rez_r,rez_c:integer;
begin
writeln('Введите стоимость пирожка (рубли)');
readln(a);
writeln('Введите стоимость пирожка (копейки)');
readln(b);
writeln('Введите число пирожков');
readln(n)
;rez_r:=a*n+(b*n)div(100);
rez_c:=b*n-((b*n)div(100))*100;
writeln('Стоймость(рубли):');
writeln(rez_r);
writeln('Стоймость(копейки):');
writeln(rez_c);
end.