vtnastya05
04.05.2022 23:35

Язык java
Создайте массив с 8 ячеек ,и для каждой считайте сканнером число из консоли.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
viktoriya2000ok
02.01.2020 20:15

Объяснение:

Редактор достаточно известен, по крайней мере представлен в значительном количестве каталогов ПО

Разработка проекта продолжается

Интерфейс редактора — оконный, а не текстовый, как nano. Текстовые неинтересны широкому кругу пользователей по причине непривычности интерфейса, хотя при желании можно сделать по ним отдельную таблицу

Распространенность ОС: Операционная система — Windows, либо кроссплатформенная и имеется порт под Windows. Чисто линуксовые можно выделить в отдельную таблицу, опять же, возможно, объединив ее с предыдущим пунктом.

0,0(0 оценок)
Ответ:
Элис6666666666
05.09.2022 03:24

// PascalABC.NET 3.6

type

 TR = record

   Имя, Отчество, Фамилия: string;

   Возраст, НомерКласса: integer;

   БукваКласса: char;

 end;

 

function ПринятьСведения: TR;

 begin

   Result.Имя := ReadlnString('Имя:');

   Result.Отчество := ReadlnString('Отчество:');

   Result.Фамилия := ReadlnString('Фамилия:');

   Result.Возраст := ReadlnInteger('Возраст:');

   Result.НомерКласса := ReadlnInteger('Номер клвсса:');

   Result.БукваКласса := ReadlnChar('Буква класса:');

 end;

 

procedure ВывестиСведения(L: List<TR>);

begin

 foreach var r in L do

   Writeln(r.Имя+' '+r.Отчество+' '+r.Фамилия:40,

      r.Возраст:4, r.НомерКласса+r.БукваКласса:4)

end;

 

begin

 var p := new List<TR>;

 var n := ReadlnInteger('Сколько учеников добавить?');

 loop n do

   p.Add(ПринятьСведения);

 p := p.OrderByDescending(t -> t.Имя).ToList;

 ВывестиСведения(p);

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота