1) 1, 2)1, 3)34, 4)2, 5)наложение, 6)рисовать, писать, подчеркивать, клей карандаш, 7)незнаю сорри
Program Task;
Const m = 12;
Var a: Array [1..m] of Integer;
i: Integer;
Function Max(a, b: Integer): Integer;
Begin
If a > b Then
Result := a
Else
Result := b;
End;
Function Min(a, b: Integer): Integer;
Begin
If a < b Then
Result := a
Else
Result := b;
End;
Begin
WriteLn('Введите среднемесячные температуры за год (через пробел)');
For i := 1 To m Do
Read(a[i]);
WriteLn('Самая высокая температура летом равна ', Max(Max(a[6], a[7]), a[8]));
WriteLn('Самая низкая температура зимой равна ', Min(Min(a[11], a[12]), a[1]));
ReadLn;
End.
- Создаешь блокнот
- Вставляешь такие символы (ну ты поймёшь)
<head>
<title> Заголовок </title>
</head>
<body>
Текст
</body>
</html>
3.В блокноте наверху будет написано "файл" и нажимаешь на него
4.Там будет "Сохранить как"
5.И внизу строчку будет написано блокнот (или как там его назвал), и ты в этой строчке, в конце пишешь .html
6.Открываешь и всё)
Скриншот
Формула
y=(2x-17√(x-7))/|3x-12|
Программа
Program y
var x, y: real
BEGIN
write ('Vvedite x');
readln (x);
y=(2*x-17*sqrt(x-7))/abs(3*x-12);
writeln ("y = ", y);
END.
Белый: 0,29; Любой: 1; Синий: 0,57; Жёлтый: 0,14; Монету: 0.