М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
adelinkalinka15
adelinkalinka15
05.07.2022 23:56 •  Информатика

Это Исполнителю Черепашке был дан для исполнения следующий алгоритм: Повтори 10 [Вперед 10 Направо 72]. Какая фигура появится на экране?

👇
Ответ:
snoopfray
snoopfray
05.07.2022

На экране появится пятиугольник


Это Исполнителю Черепашке был дан для исполнения следующий алгоритм: Повтори 10 [Вперед 10 Направо 7
4,4(17 оценок)
Открыть все ответы
Ответ:
Катяhfhfyvdhvxd
Катяhfhfyvdhvxd
05.07.2022

var

 t : array of double;

 i, n, mincount, midUp, midDown : integer;

 mid : double;

begin

 write('Введите кол-во элементов массива :');

 readln(n);

 randomize;

 setlength(t, n);

 mincount:=0;

 for i:=0 to n-1 do begin

   t[i] := random(10)/10;

   write(t[i]:1:1,'  ');

   if t[i]<0.3 then inc(mincount);

 end;

 writeln('');

 writeln('Кол-во элементов <0.3 =',mincount);

 writeln('---------------- задача 2 --------------');

 mid:=0;

 for i:=0 to n-1 do begin

   t[i] := random(10)*100 +random(10)*10 +random(10);

   mid:=mid+t[i];

   write(t[i]:0:0,' ');

 end;

 mid:=mid/n;

 midUp:=0;    midDown:=0;

 for i:=0 to n-1 do begin

   if t[i]<mid then inc(midDown);

   if t[i]>mid then inc(midUp);

 end;

 writeln();

 writeln('Средняя з/п = ',mid:1:1);

 writeln('Кол-во работников с з/п выше средней =', midUp);

 writeln('Кол-во работников с з/п ниже средней =', midDown);

end.


1. Разработать программу на языке программирования Turbo Pascal: а) в массиве t(n), где n - заданное
4,7(24 оценок)
Ответ:
Bogura
Bogura
05.07.2022

k = 7

Объяснение:

Фрагмент процедуры на языке VBA.

В двойном цикле проверяются ячейки диапазона 4 на 4

(диапазон A1:D4) на нечетность (Cells(i, j) mod 2 <>0).

Cells(i, j) - обращение к ячейке рабочего листа в строке i и в столбце j.

К столбцам А, В, С и т.д. можно обращаться по номеру 1, 2, 3 и т.д.

Операция Cells(i, j) mod 2 означает остаток от деления числа, которое находится в ячейке Cells(i, j) , на 2. Если число делится на 2 с остатком (остаток <>0 - не равняется 0), то число в ячейке  Cells(i, j) - нечетное.

В диапазоне A1:D4 7 нечетных чисел, поэтому переменная к = 7.

Ячейки диапазона просматриваются одна за другой по строкам, при этом значение счетчика k увеличивается на 1, каждый раз, когда число нечетное.

4,5(79 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ