Составить прогу, которая вычисляет среднюю скорость катера по результатам измерения в 6 пунктах. ( в массиве констант 87км/ч, 68 км/ч, 82, 7 км/ч, 91 км/ч, 86 км/ч, 67, 5 км/ч составьте, , буду признателен.
Begin readarrreal(6).Average.ToString.Println; end.
"Школьный вариант":
const N = 6;
var i: integer; ar: array[1..N]of real; s: real;
begin s := 0; for i := 1 to N do begin read(ar[i]); s := s + ar[i]; end; write(s / 6); end.
predatorfishing608
11.08.2021
Средняя глубина Черного моря — 1271 м, наибольшая- 2245 метров (вблизи Синопа). Протяженность моря между западной и восточной точками —около 1167 км, между северной и южной-624 километра. Наименьшая протяженность акватории в меридиональном направлении, между Крымом и берегом Анатолии (азиатской части Турции), 263 км. Длина береговой линии Черного моря — 4090 км, коэффициент изрезанности — около 1,8.На площади, занятой Черным морем, можно разместить две Великобритании. Азовское море соединяется с Чёрным морем Керченским проливом. Площадь его — около 38000 кв. км. Преобладающие глубины — 9-13 м, наибольшая — 14,5 м. Берега изрезаны слабо. Крупнейший залив - Таганрогский; у западного берега - система мелких заливов Сиваш. Южный берег моря холмистый, для северного и северо-восточного берегов характерны косы. В Азовское море впадают реки Дон, Кубань и другие, образуя лиманы. Климат континентальный, средняя температура воздуха летом +23?-24?, зимой -7 ?С. С конца декабря до конца февраля покрывается льдом. Течения неустойчивы. Вода отличается мутностью, море богато рыбой: судак, лещ, кефаль, осётр, и т. д. Главные порты: Ростов-на-Дону, Таганрог, Азов.
verkop9
11.08.2021
Шифр Цезаря, самое тривиальное что приходит в голову. Для несведущих, замена прямого текста согласно таблице шифрования, которая формируется следующим образом: первому символу алфавита соответствует k+1-ый символ этого же алфавита, второму - k+2-ый, третьему - k+3-ый и так далее. К самому заданию. Ъуйшябъшцйф ёш здшёэкл Бджжгш аъюаьёжв йбйкэеу Ыишдыши. В данном шифре алфавит смещён на 25 позиций. Расшифровка: Высаживаюсь на планету Илоока звёздной системы Гралгар. (комментарий автора Космическим Рейнджерам за счастливое детство)
"Школьный вариант":
const
N = 6;
var
i: integer;
ar: array[1..N]of real;
s: real;
begin
s := 0;
for i := 1 to N do
begin
read(ar[i]);
s := s + ar[i];
end;
write(s / 6);
end.