Предмет: Информатика,
автор: htggfhdg
Помогите срочно пожалуйста
Приложения:
Ответы
Автор ответа:
0
var
a: array of string;
i: integer;
begin
a := System.IO.File.ReadAllLines('input.txt');
i := Integer.Parse(a[0]);
a := a[1].Split(' ');
for i := 0 to i - 1 do
System.IO.File.AppendAllText(integer.Parse(a[i]) mod 11 = 0 ? a[i] + ' ' : ''); //Любое двузначное число с двумя цифрами одинаковыми делится на 11 без остатка, даже 00 :)
end.
a: array of string;
i: integer;
begin
a := System.IO.File.ReadAllLines('input.txt');
i := Integer.Parse(a[0]);
a := a[1].Split(' ');
for i := 0 to i - 1 do
System.IO.File.AppendAllText(integer.Parse(a[i]) mod 11 = 0 ? a[i] + ' ' : ''); //Любое двузначное число с двумя цифрами одинаковыми делится на 11 без остатка, даже 00 :)
end.
Интересные вопросы
Предмет: Английский язык,
автор: Аноним
Предмет: Физика,
автор: lybkivskyiyra
Предмет: История,
автор: Аноним
Предмет: Математика,
автор: Софилиус
Предмет: Литература,
автор: Dashka234