Саша - П,
Ваня -В
Петя-К
Коля-С
ДОВОЛЬНО ЛЕГКО
Ответ:
это логотип компании которая его выпустила
Объяснение:
название компании не знаю
var arr: array [1..9] of integer;
i, num: integer;
begin
i := 1;
while (i <= 9) do
begin
readln(num);
if (num mod 3 = 0) then
begin
arr[i] := num;
i := i + 1;
end;
end;
end.
Хорошая задача . я подумаю и скажу тебе ответ .