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

@Станислава13 · Регистрация: 20.04.2010

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

Написать программу, которая по номеру машины выводит фамилию студента, сидящего за ней. Помогите пожалуйста...Спасибо большое!

@~~pavelr~~ · 23.04.2010, 20:06

А что дано?

@Snoopy · 23.04.2010, 20:07

Pascal

uses crt;
const n=1;
type rec=record
      name,nomer:string;
     end;
var x:array[1..n] of rec;
    i:integer;
    s:string;
begin
ClrScr;
for i:=1 to n do
 begin
  Write(' Name: ');
  Readln(x[i].name);
  Write(' Nomer: ');
  Readln(x[i].nomer);
 end;
Writeln('----------------------');
Writeln('||  Name  |  Nomer  ||');
Writeln('----------------------');
for i:=1 to n do
 Writeln('||',x[i].name:8,'|',x[i].nomer:9,'||');
Writeln('----------------------');
Write('Vvedite nomer: ');
Readln(s);
if x[i].nomer=s then
 Writeln('Name: ',x[i].name);
Readln;
end.

@Станислава13 0 / 0 / 0 Регистрация: 20.04.2010 Сообщений: 13
		1
	Написать программу, которая по номеру машины выводит фамилию студента, сидящего за ней. 23.04.2010, 20:01. Показов 2903. Ответов 2 Метки нет (Все метки) Написать программу, которая по номеру машины выводит фамилию студента, сидящего за ней. Помогите пожалуйста...Спасибо большое! 0

@~~pavelr~~ Заблокирован
	23.04.2010, 20:06	2
	А что дано? 0

Опции темы

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

Решение