Тест программных программ
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: налоги в россии, курсовые работы бесплатно
| Добавил(а) на сайт: Сталин.
Предыдущая страница реферата | 11 12 13 14 15 16 17 18 19 20 21 | Следующая страница реферата
Write(g1,':',g2,' ',g3);
Delay(1000);
until keypressed;
Window(55,10,80,15);
TextBackGround(blue);
clrscr;
TextColor(yellow);
b:=readkey; {считывание цифры ответа}
Write(b); {считывание правильного ответа из файла}
Readln(u,k);
Readln(c);
If k=b Then p:=p+1; {сравнение ответов, начисление баллов}
Window(60,20,70,21);
TextBackGround(black); {закрытие окна отверов}
clrscr;
TextColor(black);
z2:=z2-1; {таймер}
If z2<0 Then Begin
z1:=z1-1;
z2:=60;
End;
If (z1=0)and(z2=0) Then GoTo l1;
GoToXY(70,15);
GetTime(g1,g2,g3,g4); {вывод текущего времени}
Writeln(z1,':',z2);
Рекомендуем скачать другие рефераты по теме: allbest, реферат отношения.
Категории:
Предыдущая страница реферата | 11 12 13 14 15 16 17 18 19 20 21 | Следующая страница реферата