Begin
for var i:=0 to 10 do writeln('Корень из ',i,' = ', sqrt(i));
end.
больше ничего не требуется, всего 3 строчки.
#/usr/bin/env python27
#к этому моменту массив massiv должен
#быть определен
for i in massiv:
....if not(i\%2):
........print i,
Хах, это же задание с Олимпиады по информатике. Второй этап. Высшая лига. 2015.
Тоже сижу, решаю)
Вот алгоритм: 2654713
===== PascalABC.NET =====
begin
var a := ArrRandom(5, -1, 1);
foreach var x in a do
Write(x:3)
end.
<span>на ПОлке есть кнИгИ. нА Полке нет __хм__т. нА ПОлке бОльШе. МестО ИгруШек.</span>