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

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

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

1 год назад

6

Нужно сделать задачу по информатике:

Введите с клавиатуры 6 чисел и найдите среднее арифметическое.Оператор с постусловием, желательно ещё блок схемы.

Информатика

1 ответ:

tannydvoi [40]1 год назад

0 0

Ну вот так вот как-то....

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

Сколько цветов содержится в Палитре?

Rock n Rolla

Ну это же странно ты никогда паинтом не пользовался ? 256

0 0

4 года назад

Прочитать ещё 2 ответа

Найти все трехзначные простые числа. Определить функцию, позволяющую распознавать простые числа.

Ютюбер

// PascalABC.NET 3.1, сборка 1256 от 21.06.2016
function IsPrime(n:integer):boolean;
begin
if n<4 then Result:=True
else begin
    var found:= (n mod 2 = 0);
    var p:=3;
    while (not found) and (sqr(p)<=n) do
      begin
      found:=(n mod p = 0);
      p+=2
      end;
    Result:=not found
    end
end;

begin
Range(100,999).Where(n->IsPrime(n)).Println(',')
end.

<u><em>Результат</em></u>
101,103,107,109,113,127,131,137,139,149,151,157,163,167,173,179,181,191,193,197,199,211,223,227,229,233,239,241,251,257,263,269,271,277,281,283,293,307,311,313,317,331,337,347,349,353,359,367,373,379,383,389,397,401,409,419,421,431,433,439,443,449,457,461,463,467,479,487,491,499,503,509,521,523,541,547,557,563,569,571,577,587,593,599,601,607,613,617,619,631,641,643,647,653,659,661,673,677,683,691,701,709,719,727,733,739,743,751,757,761,769,773,787,797,809,811,821,823,827,829,839,853,857,859,863,877,881,883,887,907,911,919,929,937,941,947,953,967,971,977,983,991,997

0 0

4 года назад

Помогите пожалуйста решить кроссворд.1) Наименьший элемент текста (6 букв)2)Последовательность символов, которая оканчивается си

Artmorozov

1.символ
2.строка
3.курсор

0 0

3 года назад

Определите информационный объем изображения с глубиной цвета 16 и размером 800x600

Качок

(I - объем информации, K - кол-во пикселей, i - вес одного пикселя / глубина цвета)

Дано:

K = 800 * 600 = 480000 пикселей

i = 16 бит

I - ?

Решение:

I = K * i = 480000 * 16 = 7680000 бит

7680000.0 бит = 960000.0 байт = 937.5 Кбайт

0 0

3 года назад

Массив 5 на 5 заполняется случайными числами от 0 до 99 в каждой строке массива найти минимальное значение . Паскаль. Помогите п

АлександрС500

var
a: array [1..5, 1..5] of byte;
min: array [1..5] of byte;
i, j: byte;

begin
for i := 1 to 5 do min[i] := 100;
for i := 1 to 5 do
for j := 1 to 5 do
begin
a[i, j] := random(0, 99);
if (min[i] > a[i, j]) then min[i] := a[i, j];
end;

for i := 1 to 5 do
begin
for j := 1 to 5 do
write(a[i, j]:2, ' ');
writeln('- ', min[i]);
end;
<span>end.</span>

0 0

4 года назад