1) дан массив целых чисел a[1..8]. найти количество отрицательных элементов массива. 2) дан массив целых чисел a[1..8]. вывести на экран сумму элементов массива, если a[k]=k^2.
katyaklimovich
2
30.07.2019 05:00
2
Другие вопросы по теме Информатика
anastasiasestak
12.12.2020 02:22
Карамель6666
12.12.2020 02:22
канна
12.12.2020 02:22
nasten4ik0194
16.11.2020 14:43
alena0707listru
16.11.2020 14:44
shubinaale
24.04.2020 12:36
bannikovegor
24.04.2020 12:35
avorob
24.04.2020 12:34
Danil111234
01.10.2019 15:20
Популярные вопросы
- Паук и муха сидят на соседних гранях куба, ребро которого равно 4...
1 - В течение трёх дней рабочие ремонтировали по 170 м дороги ежедневно,...
1 - Три самосвала привезли на стройку 21 т песка поровну каждый. Сколько...
1 - Желчь вырабатывается 1. желчным пузырем 2. двенадцатиперстной кишкой...
3 - В пяти одинаковых квартирах 20 комнат. Сколько комнат в трёх таких...
2 - От одного цветка в противоположных направлениях поползли муравей...
3 - В магазине продаются рубашки 4 цветов и галстуки 8 цветов. Сколько...
3 - В 6 одинаковых банках с синей краской столько же килограммов краски,...
3 - Чтобы увеличить период электромагнитных колебаний в идеальном колебательном...
3 - Назовите старший разряд и укажите, в каком разряде стоит цифра 7...
1
for i:=1 to 8 do begin
if a [i]<0 then inc (c);
end;
writeln (c);
2)c:=0
for i:=1 to 8 do begin
c=c+i×i;
end;
writeln (c);