Question

Помогите пожалуйста)Заранее спасибо!!
Напишите программу, которая решает следующую задачу
Оплата Интернета в школе состоит из двух частей: 100 долларов в месяц за доступ и 5
долларов в месяц за поддержку школьного сайта. Платеж можно делать независимо за
любое количество месяцев за доступ и за поддержку сайта. Напишите программу, которая
позволяла бы вводить отдельно количество оплачиваемых месяцев для доступа и
поддержки и выводила бы сумму оплаты.

Answer 1

эээ типа так??
program z1;
var m:integer;
d,p:real;
begin
writeln('Введите кол-во месяцев, за которые будет произведена оплата:');
readln(m);
d:=m*100;
p:=5*m;
writeln (d,' долларов - за доступ и ',p,' долларов - за поддержку сайта');
end.

Answer 2

отлично