NOT ORTALAMANI BULAN PROGRAM
uses crt;
var
not1,not2,not3:byte;
ort:real;
begin
clrscr;
write('BIRINCI NOTU GIRINIZ:'); readln(not1);
write('IKINCI NOTU GIRINIZ:'); readln(not2);
write('UCUNCU NOTU GIRINIZ:'); readln(not3);
ort:=(not1+not2+not3)/3;
write('ORTALAMA:',ort:3:2);
readln;
end.
|