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