program xxx; var i, n, max : integer; s : real; a : array [1..20] of integer; begin write (‘введите n= ‘); readln(n); for i: =1 to n do readln (a[i]); max: = a[1]; for i: =1 to n do if a[i] > max then max : = a[i]; s: = sqrt(max); write (‘корень из наибольшего эл-та =’, s)end.
Ответ разместил: Гость
в древней индии, до изобретения китайцами бумаги, которую потом экспортировали в индию, писали либо на камнях, либо на пальмовых листьях сажей или другими красителями, разведенными на козьем молоке (казеин).
Источник: vse-znaniya.com
Какие программы продаются в специальной упаковке с сопровождающей документацией? 1) бесплатные программы
2) условно бесплатные программы
3) коммерческие программы
begin for i : = 5 to 200 do begin s : = 0; for j : = 1 to i div 2 do if (i mod j = 0) then s : = s + j; if s = i then writeln(i); end; end.
Программа для торговых консультантов
Другие вопросы по Информатике
Химия, 02.03.2019 05:30, mazeke78
1. признаки, отличающие озон от кислорода: а) агрегатное состояние; б) количественный состав молекулы; в) относительная плотность по воздуху; г) способность уничтожать бактерии. 2. в одном сосуде находится воздух, а в другом —
озон. укажите, как их можно различить, не используя реактивы. 3. рассчитайте относительную плотность озона по водороду и кислороду. 4. масса 1л газа (н. у.) равна 2,143г. определите его молярную массу.
Математика, 02.03.2019 12:10, Diana6754
Реши уравнение: (х-а): 400=549 найди х при а=3969
Математика, 03.03.2019 00:30, komissarova5310
От причала а до причала в и обратно туристы плыли на лодке. на весь пусть они затратили меньше 3 ч 30 мин. скорость лодки в стоячей воде 5 км /ч, а скорость течения 2 км/ч. оцените расстояние от причала а до причала в.
Экономика, 03.03.2019 08:20, Даша07кбр
Можно ли надеяться, что прогресс науки и техники когда-нибудь сможет преодолеть относительную ограниченность ресурсов?
Русский язык, 03.03.2019 08:50, 089280ig
Составить предложения со словами стенной, осенний, раннее, каменный и разобрать их по составу.
Алгебра, 03.03.2019 09:30, kiril228tut
Из пункта а в пункт в одновременно выехали два автомобилиста. первый проехал с постоянной скоростью весь путь. второй первую половину пути со скоростью, меньшей скорости первого на 4 км/ч, а вторую половину пути со скоростью
Бесплатные программы для магазина? Да, они существуют!
30 км/ч, в результате чего прибыл в пункт в одновременно с первым. найдите скорость первого, если известно, что она больше 20 км/ч
Знаешь правильный ответ?
Какие программы продаются в специальной упаковке с сопровождающей документацией? 1) бесплатные прогр.
Источник: shablon.iotvetik.com
Какие программы продаются в специальной упаковке с сопровождающей документацией? 1) бесплатные программы
2) условно бесплатные программы
3) коммерческие программы
в настройках самого хонора > доп.функции > эффекты > «красные глаза» > не подавлять (не включать или же включить). готово.
Ответ разместил: Girjd
наверное, ответ 3
Похожие вопросы:
Информатика, 23.04.2019 11:52
Используя метод нисходящего проектирования составить программу вычисления функции при заданных значениях аргументов.
Информатика, 27.04.2019 23:19
Задали дз по информатике. как написать с чертёжника спиридонов вячеслав?
Информатика, 11.05.2019 16:52
Чем отличается qcy qs1 tws от версии qcy t1c это наушники с Алиэкспресс
Информатика, 14.05.2019 09:19
вас людю добрые, не дайте сгинуть
Информатика, 17.05.2019 19:12
Синформатикоой вычислить длину кривой в с++ по уравнению 0,02e^2x=4sin(6x) на отрезке(можно взять любой небольшой)
Информатика, 18.05.2019 21:54
C# запишите числа фибоначчи (< 50), нарисуйте блок-схему
Информатика, 20.05.2019 08:22
Составьте блок схему program n_18; var n, sum, q: integer; begin write (‘ n = ‘); readln (n); writeln; q: = 0; sum: =0; while n> 0 do begin inc (q); sum: = sum + n mod 10; n: = n div 10; end; writeln (‘количество цифр: ‘ , q); writeln (‘ сумма цифр: ‘sum); end.
Информатика, 20.05.2019 15:56
20 вопросов на тему электронная таблица excel
Информатика, 20.05.2019 21:12
Как можно рзвернуто почему передача и получение информации — разные информационные процессы.
Информатика, 22.05.2019 18:20
3дали решать на дом контрольную по информатике.
Информатика, 24.05.2019 12:26
Вычислите информационный объём цветного фильма продолжительностью 1,5ч представленного на экране монитора с разрешением 1200×600 пикселей, палитрой 65 536 цветов, если за одну секунду сменяется 36 кадров
Информатика, 26.05.2019 14:02
Панель -графикой intel® не открывается. после инициализации окно закрывается, но потом не чего не выскакивает.
У тебя есть свой ответ?
Какие программы продаются в специальной упаковке с сопровождающей документацией? 1) бесплатные прогр.
Источник: otvetovik.com