Заполнить одномерный массив случайными числами и вывести его на экран

@sweta991 · Регистрация: 07.12.2012

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

1)заполнить одномерный массив случайными числами и вывести его на экран.Выбрать минимальный элемент в массиве
2)В массиве заданы фамилии 10 студентов и их рост фамилии в символьном массиве ,рост-в числовом.Вывести фамилии тех студентов рост которых больше 185 см.

@CodeR · 07.12.2012, 07:52

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

1)заполнить одномерный массив случайными числами и вывести его на экран.Выбрать минимальный элемент в массиве

Pascal

Var A:array[1..100] of integer;
    i,imin,n:byte;
Begin
    Randomize;
    write('Введите размерность: ');readln(n);
    For i:=1 to n do
    Begin
      A[i]:=random(31)-15;
      write(A[i]:4);
    End;
    imin:=1;
    For i:=1 to n do
     if A[i]<A[imin] then imin:=i;
    writeln;
    writeln('Min = ',A[imin]);
    readln;
End.

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

2)В массиве заданы фамилии 10 студентов и их рост фамилии в символьном массиве ,рост-в числовом.Вывести фамилии тех студентов рост которых больше 185 см.

Pascal

Const n=3;
Var A:array[1..n] of integer;
    B:array[1..n] of string;
    i:byte;
Begin
    Randomize;
    For i:=1 to n do
    Begin
      writeln('Информация о ',i,'-ом ученике ');
      write('Фамилия: ');readln(B[i]);
      A[i]:=random(150)+100;
      writeln('Рост: ',A[i]);
    End;
    writeln('Ученики у которых рост больше 185');
    For i:=1 to n do
     if A[i]>185 then writeln(B[i]);
    readln;
End.

Добавлено через 28 секунд
Один вопрос=одна тема учим правила!

@sweta991 0 / 0 / 0 Регистрация: 07.12.2012 Сообщений: 3
		1
	Заполнить одномерный массив случайными числами и вывести его на экран 07.12.2012, 06:59. Показов 5714. Ответов 1 Метки нет (Все метки) 1)заполнить одномерный массив случайными числами и вывести его на экран.Выбрать минимальный элемент в массиве 2)В массиве заданы фамилии 10 студентов и их рост фамилии в символьном массиве ,рост-в числовом.Вывести фамилии тех студентов рост которых больше 185 см. 0

	07.12.2012, 07:52

Заполнить одномерный массив случайными числами и вывести его на экран

Решение