vara: array[1..500] of integer; i,k,n: integer; begink: =0; write('n= '); readln(n); for i: =1 to n do readln(a[i]); for i: =1 to n do k: =k+a[i]*a[i+1]; writeln(k); end.
Ответ дал: Гость
program xxx;
var i, n, s : integer;
begin
write('введите число n=');
readln(n);
s: =0;
i: =2;
while i< =n do
begin
s: =s+i;
i: =i+2
end;
write('сумма четных чисел =', s);
readln
end.
Ответ дал: Гость
Ответ дал: Гость
а) наличие электромагнитного излучения, сrt
б) ухудшение качества изображения при изменении угла обзора, lcd
в) компактные размеры lcd
г) достаточно сильное ухудшение качества изображения при изменении рекомендуемой производителем разрешающей способности crt lcd
д) формирование изображения с лучей электронных пушек, crt
е) меньший вред для здоровья человека при работе. lcd
Популярные вопросы