zad

HH DOSBox 0.74. Cpu speed:	3000 cycles, Frameskip 0, Program: TURB(^^	^ w=m\w>
File Edit Search	Run Compile Debug Tools Options	Uindów Help

=[■]    ZADJL1.PAS =

{zad 11> uar

pkt,plus,kolo:rea1; begin

writelnC'Podaj ilosc punktów z kolokwium'); readln(kolo);

writelnC'Podaj ilosc plusów'); readln(plus); pkt:=plus*0.5; pkt:=pkt+kolo;

if pkt<=2.5 then writelnC'ocena ndst') else if pkt<=3 then writelnC'ocena dst') else if pkt<=3.5 then writelnC'ocena dst') else if pkt<=4 then writelnC'ocena db') else if pkt<=4.5 then writelnC'ocena bdb+') else writelnC'ocena bdb'); readln; end.

15:47

FI Help F2 Saue F3 Open Alt+F9 Compile F9 Make Alt+FlO Łocal menu