Напишите программу, вычисляющую какую сумму денег нужно платить за электроэнергию, если у пользователя программы запрашивается количество КВт электроэнергии, которое было израсходовано за расчѐтный месяц, и какова плата за 1 КВт электроэнергии.
Answers & Comments
uropb123
Program kBt; uses crt; var kBte,kBt1,sum:real; begin clrscr; writeln('vvedite lo-vo KBt: '); read(kBte); writeLn('vvedite cenu za 1 KBt: '); read(kBt1); sum:=kBte*kBt1; writeln('Neobhodimo oplaltit ',sum); readln; end.
Answers & Comments
uses crt;
var
kBte,kBt1,sum:real;
begin
clrscr;
writeln('vvedite lo-vo KBt: ');
read(kBte);
writeLn('vvedite cenu za 1 KBt: ');
read(kBt1);
sum:=kBte*kBt1;
writeln('Neobhodimo oplaltit ',sum);
readln;
end.