Ввести номер автобуса, вывести количество остановок его маршрута

@Gira · Регистрация: 12.06.2014

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

Ввести номер автобуса. Вывести количество остановок его маршрута.

@APALoff · 18.06.2014, 10:52

Pascal

1 2	Readln(a); Writeln(m[a]);

@Gira · 18.06.2014, 10:55 **[ТС]**

а дале как делать

@APALoff · 18.06.2014, 11:00

По поставленным условиям - это все!

@erl27 · 18.06.2014, 11:16

Например, так:

Pascal

var
 Q: array[1..100] of integer;
 i, N: byte;
  
begin
  writeln('Введите номер автобуса (от 1 до 100):');
  readln(N);
  for i := 1 to 100 do Q[i] := 5 + random(16);
  writeln('Количество остановок: ', Q[N])
end.

@Gira 0 / 0 / 0 Регистрация: 12.06.2014 Сообщений: 48
		1
	Ввести номер автобуса, вывести количество остановок его маршрута 18.06.2014, 10:37. Показов 2458. Ответов 4 Метки нет (Все метки) Ввести номер автобуса. Вывести количество остановок его маршрута. 0

@Gira 0 / 0 / 0 Регистрация: 12.06.2014 Сообщений: 48
	18.06.2014, 10:55 [ТС]	3
	а дале как делать 0

@APALoff 1646 / 1075 / 1081 Регистрация: 03.07.2013 Сообщений: 4,507
	18.06.2014, 11:00	4
	По поставленным условиям - это все! 0

	18.06.2014, 11:16

Опции темы