n-896458
?>

Ұсынылған сценарийді зерттеп, Мысықтың әрекеттерінің дұрыс санын көрсет. Мысық Күшікпен кездескенде «Сәлем!» деді. Күшік «Қайырлы күн!» деп жауап берді. Мысық Күшікпен қоштасарда «Сау бол!» деді. Күшік жауап бермеді. Әр спрайт 50 қадамнан кейін костюмдерін ауыстырады. Спрайт Әрекеттер саны Мысық Күшік 3 Жауабы:

Информатика

Ответы

Kisuha8465

Напишите программу (python), которая соберет все подарки Иа от всех друзей.

Формат ввода

Целое число — количество строк, затем сами строки, в которых сначала вводится подарок, а потом через дефис, окруженный пробелами, имя друга.

Формат вывода

Вывести для каждого друга (друзья выводятся в обратном алфавитном порядке) список его подарков Иа, но уже в алфавитном порядке. Формат вывода:

Друг: подарок, подарок, подарок

Ввод

5

Букет из чертополоха - Кролик

Бант для хвоста - Кристофер Робин

Гвоздик для хвоста - Кристофер Робин

Спаржевый пудинг - Кролик

Зеленая тряпочка - Пятачок

Вывод

Пятачок: Зеленая тряпочка

Кролик: Букет из чертополоха, Спаржевый пудинг

Кристофер Робин: Бант для хвоста, Гвоздик для хвоста

evsmorodina
Const
  MAX_SIZE = 10;
 
var
  a: array[1..MAX_SIZE] of integer;
  i, size: integer;
 
procedure delete_odd_elements();
var i, j: integer;
begin
  i := 1;
  repeat
    if odd(a[i]) then
    begin
      dec(size);
      for j := i to size do
        a[j] := a[j + 1]
    end
    else inc(i);
  until i > size;
end;
 
begin
  writeln('Исходный массив: ');
  size := MAX_SIZE;
  for i := 1 to size do
  begin
    a[i] := random(100);
    write(a[i] : 3);
  end;
  delete_odd_elements;
  writeln;
  writeln('Полученный массив: ');
  for i := 1 to size do
    write(a[i] : 3);
end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Ұсынылған сценарийді зерттеп, Мысықтың әрекеттерінің дұрыс санын көрсет. Мысық Күшікпен кездескенде «Сәлем!» деді. Күшік «Қайырлы күн!» деп жауап берді. Мысық Күшікпен қоштасарда «Сау бол!» деді. Күшік жауап бермеді. Әр спрайт 50 қадамнан кейін костюмдерін ауыстырады. Спрайт Әрекеттер саны Мысық Күшік 3 Жауабы:
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

ЕВ1873
sdy19576216
Aliferenko
devochkadafka624
lika080489
Ruzalina_Svetlana1435
vera2job7
Алина1564
artemyanovich8
makeeva-nataliya60
natakrechko
dp199088206
kv135549
deniskotvitsky56
Svetlana1884