Регистрация
krecet6r
09.02.2020 10:21
Информатика
Есть ответ 👍

1 2 3 4 5 а а в р м д
в ь к с о л
с з п у т б
д и р н з е

1.а2,д1,А5,д5,в4,с1,А1,с2,д1,в3,в1

2.а2,в4,в3,с2,аа3,в4,д1,д4,а2,д5,А5,д5,А5,д3,д1.

3.а3,д5,А5,А1,вв2,с4,в4,аа3.

составить слова позяя

​

230
329
Посмотреть ответы 1

Ответы на вопрос:

maxsimsto
maxsimsto
4,7(56 оценок)
Var a: array [1..10] of integer;     i: integer; begin       for i : = 1 to 10 do readln(a[i]);       for i : = 1 to 10 do           if (a[i] > 0) then writeln('[', i, '] => ', a[i]); end.такое подойдёт? )

Популярно: Информатика