uses crt;
var
ar: array[1..19]of integer;
i, mul, sum, count, min, mini: integer;
begin
count : = 0;
sum : = 0;
mul : = 1;
randomize;
for i : = 1 to 19 do
begin
ar[i] : = random(13) - 6;
mul : = mul * ar[i];
if(ar[i] mod 2 = 0) then
begin
textbackground(green);
sum : = sum + ar[i];
count : = count + 1;
end;
if(ar[i] = 5) then
textbackground(red);
write(ar[i], ' ');
textbackground(black);
end;
writeln();
writeln('произведение всех элементов массива = ', mul);
writeln('сумма четных чисел = ', sum, ', количество = ', count);
min : = ar[1];
mini : = 1;
write('номера элементов, равных 5: ');
for i : = 1 to 19 do
begin
if(ar[i] = 5) then
write(i, ' ');
if((ar[i]) < min) then
begin
min : = ar[i];
mini : = i;
end;
end;
writeln();
writeln('минимальный элемент = ', min, ', его номер = ', mini);
end.
Символ @, который мы используем в электронном адресе, изобрел создатель электронной почты Рэй Томлинсон. Впрочем, его происхождение уходит вглубь веков. Корреспондент BBC Future исследует его историю, а также необычные и поэтические названия @ в разных языках мира.
В нем прекрасно и подробно рассказано, как в 1971 году 29-летний компьютерный инженер Рэй Томлинсон изобрел всемирную эмблему, когда остановил свой выбор на довольно непонятном значке @, который должен был стать центральным символом его новаторской системы передачи электронных сообщений.
я пыталась)
Поделитесь своими знаниями, ответьте на вопрос:
Опиши диск и флэш-память.сравни их.создай в рабочуй тетради и в текстовом редакторе определения понятий диск и флэш-память