Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
Moonlight06
24.02.2023 17:34 •
Информатика
Какой тип диаграммы используется, если величины в сумме 100%? 1) точечная 2) столбчатая 3) круговая 4) линейчатая
👇
Увидеть ответ
Ответ:
equillirum
24.02.2023
ответ: 3)Круговая (Элементарно)
4,8
(26 оценок)
Открыть все ответы
Ответ:
yarikplay13
24.02.2023
//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
for var i:=1 to 1000 do
if i mod 7 =0 then print(i);
end.
Тестовое решение:
7 14 21 28 35 42 49 56 63 70 77 84 91 98 105 112 119 126 133 140 147 154 161 168 175 182 189 196 203 210 217 224 231 238 245 252 259 266 273 280 287 294 301 308 315 322 329 336 343 350 357 364 371 378 385 392 399 406 413 420 427 434 441 448 455 462 469 476 483 490 497 504 511 518 525 532 539 546 553 560 567 574 581 588 595 602 609 616 623 630 637 644 651 658 665 672 679 686 693 700 707 714 721 728 735 742 749 756 763 770 777 784 791 798 805 812 819 826 833 840 847 854 861 868 875 882 889 896 903 910 917 924 931 938 945 952 959 966 973 980 987 994
4,7
(88 оценок)
Ответ:
KVika65
24.02.2023
Думаю нет большой разницы между процедурой и функцией, просто функция куда удобнее.
Для нахождения нода используется алгоритм Эвклида
//PascalABC.Net
function NOD(A, B: integer): integer;
begin
while A <> B do
if A > B then A := A - B else B := B - A;
NOD := A;
end;
procedure pNOD(A, B: integer; var NOD: integer);
begin
while A <> B do
if A > B then A := A - B else B := B - A;
NOD := A;
end;
begin
var a: Array of integer := (16, 32, 40, 64, 80, 128);
var n := a[low(a)];
for var i := low(a) to high(a) do
pNOD(n, a[i], n);
Writeln(n);
end.
4,8
(31 оценок)
Это интересно:
Д
Дом-и-сад
09.05.2023
Получаем безупречное качество: как покрасить металл?...
К
Кулинария-и-гостеприимство
01.02.2021
Как растопить белый шоколад: лучшие способы и советы...
С
Стиль-и-уход-за-собой
24.08.2022
Как избавиться от прыщей на спине...
С
Стиль-и-уход-за-собой
04.06.2021
Избавляемся от перхоти натуральными средствами...
К
Компьютеры-и-электроника
23.02.2021
Битмоджи на Facebook: Как произвести впечатление на своих друзей...
И
Искусство-и-развлечения
26.03.2021
Как найти свой танцевальный стиль?...
В
Взаимоотношения
10.02.2023
Как привлечь внимание своего парня: 5 советов, чтобы выглядеть горячей штучкой...
С
Стиль-и-уход-за-собой
10.09.2020
Как подобрать симпатичные наряды: советы эксперта по моде...
П
Праздники-и-традиции
12.08.2021
Как сделать День Святого Валентина особенным с ограниченным бюджетом...
К
Компьютеры-и-электроника
05.06.2020
Как обновить приложение на Android: Инструкция от профессионалов...
Новые ответы от MOGZ: Информатика
pczheka1
07.11.2021
Паскаль авс моделирование исполнителя «счётчик». дана последовательность целых чисел. требуется определить, сколько в ней четных и нечетных чисел...
софика4
02.08.2020
Программа моделирует при датчика случайных чисел бросание двух игральных костей до выпадения двух 6. выведите на экран число бросаний. авс паскаль...
Данил3472
02.04.2021
Известный пират флинт положил некоторую сумму s в банк под 3% годовых. выведите на экран, на какую сумму он реально сможет купить товар через 10 лет, если инфляция составляет...
artem1514
30.04.2023
Для хранения текста объемом 5120 символов при 8 битом кодировании потребуется...
ordabaevabayan
20.02.2021
1.что такое файл и из каких частей его имя сотоит. 2.что означает универсальный и какое устройство является таким ? 3.сколько весит 1 байт.4.как переводить из двоичной...
simakovk9
20.02.2021
Какое устройство лишнее ? принтер монитор наушники микрофон...
Danothka
27.03.2023
Периметр прямоугольника равен 26 см,а его площадь равна 42см^2.найдите стороны прямоугольника.решите через систему...
menshikovborisg
27.03.2023
Представьте выражение 3 в 11 степени*27 во 2 степени в виде степени с основанием 3....
лис8889
27.03.2023
Перечислите греческие чудеса света (4)...
Gatkek
27.03.2023
Напишите сочинение на тему: какой закон я бы издал? буду ))...
MOGZ ответил
Найдите сумму целочисленных решений неравенства...
В автобусе 47 мест(-а). Какое наименьшее число автобусов необходимо,...
Прочитай и Спиши текст Здравствуй весна....
найдите в тексте несогласованные определения и приложения как члены...
Спрогнозуйте що може очікувати на людство в майбутньому якщо ставлення...
Для каких соединений характерна реакция серебренного зеркала Почему...
Мәтін не туралы? Мәтін қандай стильде жазылған? Оған дәлел ретінде...
нужна Кто или что собирается делать этим вечером? на этой неделе?...
соч на англиском 7 класс перевод вроде слелал теперь нужно написать...
Творческая работа.Рассмотри иллюстрацию и пункты плана.Предположи...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ