Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
ответ:знаю только первые 2
Объяснение джойстик, монитор.
1.джойстик
2.монитор
3.файл
4.колонки
5.процессор
6.мышь
7.дискета
8.принтер
9.диск
10.вебкамера
11.клавиатура
program xxx;
var i, n : integer;
s : real;
a : array [1..20] of real;
begin
writeln('введите размерность массива n=');
readln(n);
write('введите элементы массива а: ');
for i: =1 to n do
readln(a[i]);
writeln('исходный массив а: ');
writeln(a[i]);
s: =0;
if a[i]> 0 then s: =s+a[i];
writeln('сумма положительных элементов =', s);
readln
end.
смотри блок-схему в приложенном файле
Популярные вопросы