Другие вопросы по теме Информатика
Kulimshina
31.01.2022 00:48
LikaKostukova
22.12.2020 10:32
HNLLZ
22.12.2020 10:31
ProstoSashaProsto
22.12.2020 10:26
natulya26
22.12.2020 10:21
Tvoy1Batya
22.12.2020 10:20
LaMihaLa
22.12.2020 10:19
tagirova2
22.12.2020 10:18
goroh4
22.12.2020 10:18
Популярные вопросы
- Сообшение на тему (русский язык-государственый язык РФ) используете материалы...
3 - 44,33:4,8-20,33:4,8Решить удобным ....
3 - 1)D=5 см C-2 2)R=7 см C-? S-? 3)D=см C-? S-?...
2 - Портретный жанр. Виды портрета. Мировое искусство. Урок 1 Соедини пары....
3 - Пидец как Какие Вы знаете кинематические характеристики поступательного...
2 - Ашот съел одну жабу , сколько какашек он выкакал?...
2 - ЖАЗЫЛЫМ 8 тапсырма. Қазақ отбасында қандай дәстүрлер бар? «Кім не істейді?»...
2 - 9. Вычислите: 5 35 41 1) 3 2 + 20 15 2) 17 32 3) 11 9 + 28 14 4) 12 36 45...
1 - 6 Прочитайте. О чём говорят пословицы? В каких ситуациях их можно упо-треблять?...
3 - 5 тапсырма. 《Туркілердің көне жазбасы》 деген тақырыпта кластер түзiндер....
3
var
a : array[1..10] of real;
i : integer;
begin
for i := 1 to 10 do
if i mod 2 = 0 then
a[i] := i / 2
else
a[i] := (i+2)/2;
writeln('Среднее арифметическое a[3] и a[4]: ', (a[3] + a[4]) / 2:5:2);
end.