Задать вопрос!

Задать вопрос!

Все категории

4 года назад

15

Догадайтесь ,о каких носителях информации идёт речь ИСКДАМНКЕЬАСКСТЕАППРСИАУСЕКДИАТАГУБАМЛФЕШЧЕВИСТЕН

Информатика

1 ответ:

Олеся984 года назад

0 0

Диск
Камень
Кассета
Папирус
Дискета
Бумага
Флешка
Винчестер

Читайте также

Необходимо создать массив из 10 случайных чисел, в котором программа определяет наибольшие элементы и выводит на экран их номера

ксения 200

Смотри вложение
........................

0 0

4 года назад

Помогите плизз очень прошу

Анатолий Дубинин

Вот держи мне поставил четыре

0 0

4 года назад

Составить блок схему по программе: Program Vectors; var k,i,j,sum,para:integer; y,z:array[1..100] of integer; begin sum:=0;para:

Chenobil

Смотрите вложение
смотрите вложение
смотрите вложение
смотрите вложение

0 0

3 года назад

Надо составить блок схему и программу которая по заданным х и у, определяет пренадлежит ли точка М (х и у) заштрихованой области

Арина Сергеевна П

Ответ:

Объяснение:

На каком языке программа нужна?

0 0

1 год назад

Дан целочисленный массив из 7 элементов: 1) подсчитать произведение элементов массива кратных 5 и кратных 3. 2)подсчитать средне

OopsCombo

Var a:array[1..7]of integer;
p3,p5,s,i,k,min,n:integer;
srz:real;
begin
p5:=1; p3:=1; min:=25;
for i:=1 to 7 do
begin
read(a[i]);
if a[i]<>0 then
begin
    if a[i] mod 5=0 then p5:=p5*a[i];
   if a[i] mod 3=0 then p3:=p3*a[i];
   if a[i] mod 2=0 then
     begin
   s:=s+a[i];
      k:=k+1;
     end;
   if a[i]<min then
   begin
      min:=a[i];
      n:=i;
     end;
end;
end;
srz:=s/k;
writeln;
write('proizv kratnih trem:',p3,' proizv kratnih peti:',p5,' srednee znachenie chet elementov:',srz,' minimalnoe:',min,' nomer minimalnogo:',n);
end.

0 0

4 года назад