4 года назад

В массиве хранится информации о стоимости каждой из 60 книг. Определить количество самых дешёвых книг.

Знания

Информатика

1 ответ:

NAKY [71]4 года назад

0 0

uses crt;
var i,min,s:integer;
a:array[1..60] of integer;
begin
s:=0;
for i:=1 to 60 do a[i]:=random(35)+1;
min:=a[1];

for i:=1 to 60 do if min > a[i] then min:=a[i];
for i:=1 to 60 do if a[i] = min then inc(s);

writeln(s,' books for price = ',min,' ru.');
end.

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

МАЛЬЧИКИ Программа выводит кол-во чисел кратных 9в ряду чисел который вводит пользователь (числа находятся в диапазоне от 1 до +

Сергей73lev [16]

#include <iostream>
using namespace std;

int main()
{
int n, a, c;
cout << "Количество чисел: ";
cin >> n;
c = 0;
for (int i = 0; i < n; i++) {
cout << endl << ">>> ";
cin >> a;
if (a % 9 == 0) c++;
}
cout << endl << "Ответ: " << c << endl;
return 0;
}

0 0

4 года назад

Решив стереть неправильно написанный символ , он семь раз нажал на клавишу <-(стереть) и далее должен нажать на какую клавишу

Juliyaalex

1), потому что другие варианты не подходят

0 0

4 года назад

Дано натуральное число n. Найти тройки x, y, z таких натуральных чисел, что n=x2+y2+z2 Получить результат при n=166

OTemrakova

Var x,y,z,n:integer;
begin
writeln('Введите n');
readln(n)
;for x:=1 to n do
begin
for y:=1 to n do
begin
for z:=1 to n do
begin
if (sqr(x)+sqr(y)+sqr(z)=n)then writeln('x=',x,' y=',y,' z=',z);
end;
end;
end;
<span>end.</span>

0 0

5 лет назад

Доброго времени суток! Пожалуйста, помогите написать программу на С++ для решения задачи. Дано целое число n. Выведите следующее

SevenHackz [197]

#include <iostream>
using namespace std;

int main()
{
int n, m;
cout << "n = ", cin >> n, cout << "\n";
m = n + 1 + (n+1)%2;
cout << "m = " << m;
return 0;
}

Пример:
<span>n = 17
m = 18</span>

0 0

4 года назад

Переведите в двоичную систему 856в 10 степени

АркадийВ

1101011000 в двоичной системе)

0 0

4 года назад