помогите плиз, Заполнить массив случайными числами в интервале [1000;2000) и подсчитать число элементов у которых вторая с конца цифра четная.
Предмет:
ИнформатикаАвтор:
guycpyevar a:array [1..100] of integer;
i,n:integer;
s:string;
Begin
randomize;
for i :=1 to 100 do
begin
a[i]:= random(1000)+1000;
a[i]:=a[i] mod 100;
a[i]:=a[i] div 10;
if a[i] mod 2 = 0 then n=n+1;
end;
writeln(n);
End.
Автор:
heathbergerДобавить свой ответ
Предмет:
МатематикаАвтор:
rudy79Ответов:
Смотреть
ответьте пожалуста очень нужно надо!!!!!!!!!!Падение западной римской империи связывают :
1.с нашествием гуннов на Италию
2.с разгроблением Рима вандалами
3. со смещением последнего римского императора с трона
4. со смертью последнего римского императора
напиши числа от 1 до 10 с помощью четырёх четвёрок,вставляя между ними если это необходимо знаки арифметических действий и скобки:
4 4 4 4=1
4 4 4 4=2
4 4 4 4=3
4 4 4 4=4
4 4 4 4=5
4 4 4 4=6
4 4 4 4=7
4 4 4 4=8
4 4 4 4=9
4 4 4 4=10
Предмет:
МатематикаАвтор:
jackie88Ответов:
Смотреть
почему грудной ребенок,взрослый человек,пожилой питаются по разному