Diankao4ka
25.03.2021 20:24

Списки Задание 1 1. Создайте новый список учеников учеников «Джеймс». «Дэниел» «Сьюзен». «Эмма] 2 Кто бы ни был первым в списке (ученики [0), получает золотой билет. Распечатайте следующее сообщение: печать «Золотой билет был вручен» студентам (0] I) 3. Следующий студент в списке также получает золотой билет. Распечатайте аналогичное сообщение, уточняющее, кем это будет. 4. Ясину пришлось отдохнуть. Из школы смените учеников (2) на «Faiz. 5 Используйте функцию добавления», чтобы добавить еще двух учеников по вашему выбору. Вам нужно будет использовать функцию append () дважды, один раз, чтобы добавить каждого нового члена. 6. Распечатайте полный список студентов. Дополнительное задание: после того, как будет напечатан полный список учеников • С пользователя, какого ученика он хочет заменить (число от 0 до 5) • С у пользователя имя нового ученика • Распечатайте обновленный список учеников Задание 2 7. Составьте список учителей: учителя = мистер Ар, «мистер Смит». Ньютон "," Мистер Харрис & Используйте следующий код, чтобы пройти по каждому учителю и напечатать их имя для счетчика в диапазоне (4). 9. Создайте еще один список, на этот раз, чтобы показать, сколько учеников в каждом классе учителей. Список должен состоять всего из четырех чисел (в правильном порядке). Мистер Эл. 21 Мистер Смит: 17 Ньютон: 13 Харрис: 5 10. Создайте цикл, в котором будут напечатаны имя И число учеников для каждого ученика. Код ниже может вам печатникам (счетчик), студентам (счетчик "студентов")

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
KIRILL1231321312
24.04.2023 14:55
1)
const
n=5;
var
a:array[1..n,1..n]of integer;
i,j:integer;
     begin     
         for i:=1 to n do       
               begin             
                      writeln;                     
                        for j:=1 to n do                         
                              begin                               
                                  a[i,j]:=i+j;                               
                                   write(a[i,j]:4);                         
                              end;         
               end;   
 end.
2) 
    const
        n=4;m=5;
    var
a:array[1..n,1..m]of integer;
i,j,max:integer;
begin
    for i:=1 to n do
          begin
              writeln;
              for j:=1 to m do
                  begin
                      a[i,j]:=random(100)-50;
                      write(a[i,j]:4);
                  end;
          end;
max:=a[1,1];
for i:=1 to n do
    for j:=1 to m do
          if a[i,j]>max then
              max:=a[i,j];
writeln;
writeln(max);
for i:=1 to n do
     for j:=1 to m do
           if (a[i,j]<0)and(a[i,j]>-5)then
               a[i,j]:=max;
writeln;
for i:=1 to n do
   begin
    writeln;
        for j:=1 to m do
             write(a[i,j]:4);
   end;
end.

   
0,0(0 оценок)
Ответ:
0958261046p08tm5
24.04.2023 14:55
1)
const
n=5;
var
a:array[1..n,1..n]of integer;
i,j:integer;
     begin     
         for i:=1 to n do       
               begin             
                      writeln;                     
                        for j:=1 to n do                         
                              begin                               
                                  a[i,j]:=i+j;                               
                                   write(a[i,j]:4);                         
                              end;         
               end;   
 end.
2) 
    const
        n=4;m=5;
    var
a:array[1..n,1..m]of integer;
i,j,max:integer;
begin
    for i:=1 to n do
          begin
              writeln;
              for j:=1 to m do
                  begin
                      a[i,j]:=random(100)-50;
                      write(a[i,j]:4);
                  end;
          end;
max:=a[1,1];
for i:=1 to n do
    for j:=1 to m do
          if a[i,j]>max then
              max:=a[i,j];
writeln;
writeln(max);
for i:=1 to n do
     for j:=1 to m do
           if (a[i,j]<0)and(a[i,j]>-5)then
               a[i,j]:=max;
writeln;
for i:=1 to n do
   begin
    writeln;
        for j:=1 to m do
             write(a[i,j]:4);
   end;
end.

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