Var a,b:real;
Begin
Write('Введите 2числа: '); readln(a,b);
Writeln('Среднее арифмитическое этих чисел = ',(a+b)/2);
Writeln('Среднее геометрическое этих чисел = ',(a*b)/2);
<span>End.</span>
Таблица истинности - в приложении.
0)начало
1)посадил дед репку
2)выростил
3)начал ее вытягивать из земли
4)позвал бабку
5)тянут потянут ,вытянуть не могут
5)позвали внучку
6)тянут потянут ,вытянуть не могут
7)позвали Жучку
8)тянут потянут ,вытянуть не могут
9) позвали кошку
10) тянут потянут, вытянуть не могут
11)позвали мышку вытащили
12)конец
ЦВЕТОПЕРЕДАЧА
Ц В Е
ТОПОР =》 ТОП
ДЕРЕВО =》 ОВЕРЕД =》ЕРЕД
ВРАЧ =》 АЧ
А
Если предметы, цифры или буквы изображены один в другом, то их названия читаются с добавлением предлога "в" (перед или между названий).
Если справа (сверху) от рисунка стоят перевёрнутые запятые (одна или несколько), то отбрасываются буквы в конце слова.
Если предмет на рисунке перевернут, то его название читают справа налево.
Если слева (внизу) от рисунка стоят запятые (одна или несколько), то отбрасываются первые буквы слова (по количеству запятых).
Я не знаю не видно в приложении