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

Составте программу, которая вычесляет среднюю плотность раствора(в кг/м3) по результатам изменения плотности 7 проб( в массиве констант: 1205, 1350, 1170, 1320, 1220, 1310, 1180) паскаль

👇
Ответ:
tarantilla
tarantilla
03.01.2021
Var pl, sr :real;
i :integer;
begin
cls;
writeln ('Ввод величин:');
for i:=1 to 7 do begin
readln (pl);
sr:=sr+pl;
end;
sr:=sr/7;
write ('ответ:', sr);
end.
4,4(31 оценок)
Открыть все ответы
Ответ:
666deadlyshadow666
666deadlyshadow666
03.01.2021

Парк «Феофанія»

«Феофанія» - парк-пам'ятник садово-паркового мистецтва та садово-парковий комплекс розташований на території Голосіївського району, який створено в 1972 році.

Заповідник розташований в південній частині Голосіївського району. Головною прикрасою парку вважають ланцюжок із п’яти озер, їх називають палладінські озера. На території «Феофанії» розташований гідрологічний пам'ятник природи місцевого значення та два водних джерела, багато дерев, кущів та ліан. Зберіглося багато дерев віком від 100 до 300 років і більше. У парку були зареєстровані 9 червонокнижних видів комах.

Парк «Кіото»

Парк був заснований у 1972 році , він знаходиться на Лісовому масиві. Всі деталі та символіка були запозичені із паркової культури Японії.

В центрі «Кіото» розташований сад каменів. З рослин можна побачити вікові сосни, японський клен. У вересні 2011 році була висаджена алея сакур. Дерева висаджені в два ряди вздовж пішохідних доріжок з внутрішньої сторони. В парку є дзен-сад — гравієвий сад в японському стилі з сухим озером, посеред якого стоять два камені, з'єднані містком. Поряд знаходиться альтанка та водоспад і сухий струмок. В озері живуть червоні рибки.

Объяснение:

4,4(95 оценок)
Ответ:
незнаю177
незнаю177
03.01.2021
Pascalabc.net var   a: array[1..10000] of integer;   kz,maxp,n,i,j: integer;   begin     i: =0;   maxp: =integer.minvalue;   writeln ('готов к приему чисел');   repeat     i: =i+1;     readln (a[i]);     until a[i]=0;   n: =i-1;   readln (kz);   for i: =1 to n-1 do      for j: =2 to n do        if maxp< (a[i]*a[j]) then maxp: =(a[i]*a[j]);     writeln ('получено ',n,' чисел');   writeln;   writeln ('полученное контрольное значение: ',kz);   writeln;   writeln ('вычисленное контрольное значение: ',maxp);   writeln;   if kz=maxp      then writeln ('контроль пройден')     else writeln ('контроль не пройден'); end. результаты: 1) готов к приему чисел 1 2 3 4 5 0 20 получено 5 чисел полученное контрольное значение: 20 вычисленное контрольное значение: 20 контроль пройден 2) готов к приему чисел 1 2 3 4 5 6 0 20 получено 6 чисел полученное контрольное значение: 20 вычисленное контрольное значение: 30 контроль не пройден
4,4(1 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ