Нужна помощь по информатике, программка в Паскаль.Задачка.В массиве хранится о численности
Нужна помощь по информатике, программка в Паскаль.Задачка.В массиве хранится о численности книг в каждом из 35 разделов библиотеки. Узнать, правильно ли, что общее число книжек в библиотеке есть шестезначное число?
Задать свой вопрос1 ответ
Галина Любицина
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var a:=ArrRandom(35,100,50000); a.Println;
var k:=a.Sum;
Write('Всего книжек ',k);
if (kgt;=1000000) and (klt;=9999999) then
Writeln(' - шестизначное число')
else Writeln(' - не шестизначное число')
end.
Тестовые решения:
44847 40059 3938 43998 48227 2295 18961 36991 30123 41620 22198 13146 38442 8318 35835 49112 33119 4617 20383 19164 6367 30588 40391 31807 32046 49835 4990 817 31748 21075 16466 17557 44413 12879 803
Всего книг 897175 - не шестизначное число
36802 44900 5012 30120 29288 21787 24640 41798 38286 34288 3756 5543 765 28259 26754 29598 15994 40577 26492 10557 41597 48459 13095 29019 30351 47939 35197 10527 43439 21960 40977 41831 43125 48076 10234
Всего книг 1001042 - шестизначное число
begin
var a:=ArrRandom(35,100,50000); a.Println;
var k:=a.Sum;
Write('Всего книжек ',k);
if (kgt;=1000000) and (klt;=9999999) then
Writeln(' - шестизначное число')
else Writeln(' - не шестизначное число')
end.
Тестовые решения:
44847 40059 3938 43998 48227 2295 18961 36991 30123 41620 22198 13146 38442 8318 35835 49112 33119 4617 20383 19164 6367 30588 40391 31807 32046 49835 4990 817 31748 21075 16466 17557 44413 12879 803
Всего книг 897175 - не шестизначное число
36802 44900 5012 30120 29288 21787 24640 41798 38286 34288 3756 5543 765 28259 26754 29598 15994 40577 26492 10557 41597 48459 13095 29019 30351 47939 35197 10527 43439 21960 40977 41831 43125 48076 10234
Всего книг 1001042 - шестизначное число
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
выпиши в свою тетрадь те правила этикета которые тебе не были
Разные вопросы.
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Облако тегов