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

Одномерный массив случайными числами, ввести эталонное число с клавиатуры, найти сколько раз эталонное число встречается в массиве.

👇
Ответ:
samirdebilGost
samirdebilGost
28.03.2020
Program n1;
const n=13;
var a: array [1..n] of integer;
i,k,b: integer;
begin
randomize;
k:=0;
writeln('массив:');
for i:=1 to n do
begin
a[i]:=random(15);
write(a[i],' ');
end;
writeln;
write('введите b: ');
readln(b);
for i:=1 to n do if a[i]=b then k:=k+1;
writeln('число ',b,' встречается в массиве ',k,' раз');
end.
4,6(76 оценок)
Открыть все ответы
Ответ:
surikat235
surikat235
28.03.2020
// PascalABC.NET 3.2, сборка 1345 от 24.11.2016
// Внимание! Если программа не работает, обновите её версию!

begin
  Writeln('x      x^2      x^3');
  var x:=0.1;
  while x<=1.01 do begin
    Writeln(x:4:2,x*x:7:3,x*x*x:10:6);
    x+=0.05
    end
end.

Результат
x      x^2      x^3
0.10  0.010  0.001000
0.15  0.023  0.003375
0.20  0.040  0.008000
0.25  0.063  0.015625
0.30  0.090  0.027000
0.35  0.123  0.042875
0.40  0.160  0.064000
0.45  0.203  0.091125
0.50  0.250  0.125000
0.55  0.303  0.166375
0.60  0.360  0.216000
0.65  0.423  0.274625
0.70  0.490  0.343000
0.75  0.563  0.421875
0.80  0.640  0.512000
0.85  0.723  0.614125
0.90  0.810  0.729000
0.95  0.903  0.857375
1.00  1.000  1.000000

Настоящий вид вывода показан во вложении.

Разработать алгоритм и программу вычисления квадратов и кубов чисел от 0,1 до 1, задаваемых с шагом
4,4(73 оценок)
Ответ:
FJcjfjvj
FJcjfjvj
28.03.2020

Использование нелицензионного программного обеспечения - это нарушение авторских прав, что влечёт за собой административную или даже уголовную ответственность.

Административная ответственность → это наложение штрафа с конфискацией нелицензионных экземпляров программного обеспечения и оборудования, которое использовали для воспроизведения.

Если это деяние причинило большой ущерб правообладателю, то к физическому лицу (например, владельцу компании, где использовалось нелицензионное ПО) могут применить уголовную ответственность: лишение свободы (до 2 лет) или исправительные работы.

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