Изобразить на экране электронное табло с посекундным отображением времени

@cucibob · Регистрация: 29.02.2012

Author24 — интернет-сервис помощи студентам

Написать программу «Таймер»: программа должна запросить текущее время, изобразить на экране электронное табло, на котором отображать посекундное изменение времени; через определенное время должен раздаваться звуковой сигнал. Спасибо.

@Puporev · 25.05.2012, 15:30

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
uses crt;
var h,m,s,n:integer;
begin
clrscr;
repeat
writeln('‡*¤*©вҐ вҐЄгйҐҐ ўаҐ¬п, з*бл, ¬Ё*гвл, бҐЄг*¤л:');
readln(h,m,s);
until(h in [0..23])and(m in [0..59])and(s in [0..59]);
n:=s;
clrscr;
window(35,12,45,14);
textbackground(2);
textcolor(12);
clrscr;
repeat
 gotoXY(2,2);
 if h<10 then write('0',h,':') else write(h,':');
 if m<10 then write('0',m,':') else write(m,':');
 if s<10 then write('0',s) else write(s);
 gotoXY(80,25);
 delay(1000);
 if s=60 then
  begin
   s:=0;
   m:=m+1;
  end;
 if m=60 then
  begin
   m:=0;
   h:=h+1;
  end;
 if h=24 then
  begin
   s:=0;
   m:=0;
   h:=0;
  end;
 if (s-n+1) mod 10=0 then sound(600)
 else nosound;
 s:=s+1;
until keypressed;
window(0,0,80,25);
textbackground(0);
textcolor(15);
clrscr
end.

@cucibob · 30.05.2012, 22:03 **[ТС]**

Да. задача решена. но она идет как секундомер а ни таймер.

@Puporev · 30.05.2012, 22:08

Сообщение от cucibob

программа должна запросить текущее время, изобразить на экране электронное табло, на котором отображать посекундное изменение времени; через определенное время должен раздаваться звуковой сигнал.

И что не так? Не нравится, делайте сами, или пишите задание так, как Вам нужно. Программа написана слово в слово с этим заданием. А читать здесь нравоучения менторским тоном очень не кстати, Вы сейчас уже в игноре.

@cucibob · 30.05.2012, 22:50 **[ТС]**

в этом моменте ваше крылатое выражение было неуместно. мне было просто непонятно почему время идет не как таймер, а как секундомер

@DaskOFF · 31.05.2012, 00:40

как вы учитесь, вам сделали программу, а вы вместо того чтобы поблагодарить кидаетесь претензиями
вот ваш таймер немного надо было изменить проверку...

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
uses crt;
var h,m,s,n:integer;
begin
clrscr;
repeat
writeln('‡*¤*©вҐ вҐЄгйҐҐ ўаҐ¬п, з*бл, ¬Ё*гвл, бҐЄг*¤л:');
readln(h,m,s);
until(h in [0..23])and(m in [0..59])and(s in [0..59]);
n:=s;
clrscr;
window(35,12,45,14);
textbackground(2);
textcolor(12);
clrscr;
repeat
 gotoXY(2,2); 
 if h<10 then write('0',h,':') else write(h,':');
 if m<10 then write('0',m,':') else write(m,':');
 if s<10 then write('0',s) else write(s);
 gotoXY(80,25); 
 delay(1000);
 if (m=0) and (s=0) and (h=0) then
  begin
   break;
  end;
  if (s=0) and (m=0) then
  begin
   s:=60;   
  end;
  if (m=0) and (h>0) and (s=60)  then
  begin   
   m:=59;
   h:=h-1;
  end;
  if (s=0) then
  begin
   s:=60;
   m:=m-1;
  end;    
 if (s-n+1) mod 10=0 then sound(600)
 else nosound;
 s:=s-1;
until keypressed;
window(0,0,80,25);
textbackground(0);
textcolor(15);
clrscr
end.

Новые блоги и статьи Все статьи Все блоги /
Система статов в Unity GameUnited 20.04.2025 Статы — фундаментальный элемент игрового дизайна, который определяет характеристики персонажей, предметов и других объектов в игровом мире. Будь то показатель силы в RPG, скорость передвижения в. . .	Статические свойства и методы в TypeScript run.dev 20.04.2025 TypeScript прочно занял своё место в системе современной веб-разработки. Этот строго типизированный язык программирования не просто расширяет возможности JavaScript — он делает разработку более. . .	Batch Transform и Batch Gizmo Drawing API в Unity GameUnited 20.04.2025 В мире разработки игр и приложений на Unity производительность всегда была критическим фактором успеха. Создатели игр постоянно балансируют между визуальной привлекательностью и плавностью работы. . .	Звук в Unity: Рандомизация с Audio Random Container GameUnited 20.04.2025 В современных играх звуковое оформление часто становится элементом, который либо полностью погружает игрока в виртуальный мир, либо разрушает атмосферу за считанные минуты. Представьте: вы исследуете. . .	Максимальная производительность C#: Советы, тестирование и заключение stackOverflow 20.04.2025 Погружение в мир микрооптимизаций C# открывает перед разработчиком целый арсенал мощных техник. Но как определить, где и когда их применять? Ответ начинается с точных измерений и профилирования. . . .
Максимальная производительность C#: Предсказание ветвлений stackOverflow 20.04.2025 Третий ключевой аспект низкоуровневой оптимизации — предсказание ветвлений. Эта тема менее известна среди разработчиков, но её влияние на производительность может быть колоссальным. Чтобы понять. . .	Максимальная производительность C#: Векторизация (SIMD) stackOverflow 20.04.2025 Помимо работы с кэшем, другим ключевым аспектом низкоуровневой оптимизации является векторизация вычислений. SIMD (Single Instruction, Multiple Data) позволяет обрабатывать несколько элементов данных. . .	Максимальная производительность C#: Процессорный кэш stackOverflow 20.04.2025 Знакомство с внутренним устройством процессорного кэша — ключевой шаг в написании по-настоящему быстрого кода на C#. Этот слой архитектуры компьютера часто ускользает от внимания разработчиков, но. . .	Максимальная производительность C#: Введение в микрооптимизации stackOverflow 20.04.2025 В мире разработки на C# многие привыкли полагаться на . NET Runtime, который "магическим образом" сам оптимизирует код. И часто это работает - современные JIT-компиляторы творят чудеса. Но когда речь. . .	MVC фреймворк в PHP Jason-Webb 19.04.2025 Архитектурный паттерн Model-View-Controller (MVC) – это не просто модный термин из мира веб-разработки. Для PHP-программистов это фундаментальный подход к организации кода, который радикально меняет. . .

Изобразить на экране электронное табло с посекундным отображением времени

Решение

Решение

@cucibob 0 / 0 / 0 Регистрация: 29.02.2012 Сообщений: 20

	Изобразить на экране электронное табло с посекундным отображением времени 25.05.2012, 00:39. Показов 2014. Ответов 5 Метки нет (Все метки) Написать программу «Таймер»: программа должна запросить текущее время, изобразить на экране электронное табло, на котором отображать посекундное изменение времени; через определенное время должен раздаваться звуковой сигнал. Спасибо. 0

@cucibob 0 / 0 / 0 Регистрация: 29.02.2012 Сообщений: 20
	30.05.2012, 22:03 [ТС]
	Да. задача решена. но она идет как секундомер а ни таймер. 0

@cucibob 0 / 0 / 0 Регистрация: 29.02.2012 Сообщений: 20
	30.05.2012, 22:50 [ТС]
	в этом моменте ваше крылатое выражение было неуместно. мне было просто непонятно почему время идет не как таймер, а как секундомер 0

Опции темы