Написать в программе Паскаль: Пирожок в столовой стоит а рублей и b копеек. Определите,...

Question

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

Answer 1

Program zadanie;
Var a,b,n:integer;
Begin 
Writeln('Введите стоимость пирожка в рублях и копейках'); 
Readln(a,b); 
Writeln('Сколько нужно купить пирожков'); 
Readln(n); 
Writeln('Стоимость покупки в рублях=',n*a+((b*n) div 100)); 
Writeln('Стоимость покупки в копейках=',(n*b) mod 100);
End.

Answer 2

A, b, n, s1, s2 :integer;
begin
write('введите стоимость пирожка в рублях ');
readln(a);
write('введите стоимость пирожка в копейках ');
readln(b);
write('введите количество пирожков ');
readln(n);
s1:=a*n;
s2:=b*n;
writeln('стоимость покупки в рублях ', s1);
writeln('стоимость покупки в копейках ', s2);
end.