АЛГ
нач
цел Н, буф, _и, к
к := 0
вещ сред
сред := 0
ввод Н
нц для _и от 1 до Н
ввод буф
если (буф > 0) и (mod(буф, 2) = 0) то
к := к + 1
сред := сред + буф
все
кц
вывод сред / к
кон
алг
нач
цел _и
нц для _и от 5 до 8
вывод "Y(", _и / 10, ") = ", (2 * sin(_и / 10) * sin(_и / 10)) / (cos(_и / 10) * cos(_и / 10)), нс
кц
кон
Program n1;
var kord: array[1..6] of real;
st: array [1..3] of real;
i: integer;
begin
i:=1;
while i<=6 do
begin
write('введите координаты точки через пробел: ');
readln(kord[i],kord[i+1]);
i:=i+2;
end;
st[1]:=sqrt(sqr(kord[3]-kord[1])+sqr(kord[4]-kord[2]));
st[2]:=sqrt(sqr(kord[5]-kord[1])+sqr(kord[6]-kord[2]));
st[3]:=sqrt(sqr(kord[5]-kord[3])+sqr(kord[6]-kord[4]));
if (st[1]<(st[2]+st[3])) and (st[2]<(st[1]+st[3])) and (st[3]<(st[1]+st[2])) then write('P=',st[1]+st[2]+st[3]) else write('треугольник не существует');
end.
Эта команда создаст все каталоги:
mkdir C:\школа\проекты\информатика\2четверть\контрольная
Создавать презентацию нужно в каталоге C:\школа\проекты, потом нужно переместить ее в C:\школа\проекты\информатика\2четверть\контрольная.
Возможный вариант в C++
#include <iostream>
int main()
{
using namespace std;
int N;
cout << "Enter N: ";
cin >> N;
int num;
int max = 1;
int i;
for (i = 0; i < N; ++i)
{
cout << "Enter #" << i + 1 << " number: ";
cin >> num;
if ((num - 9) % 10 != 0 && num % 3 == 0)
{
max = num;
break;
}
}
for (int j = i + 1; j < N; ++j)
{
cout << "Enter #" << j + 1 << " number: ";
cin >> num;
if ((num - 9) % 10 != 0 && num % 3 == 0)
if (num > max)
max = num;
}
if (max != 1)
cout << "Max number div by 3 and don't end 9: " << max << endl;
else
cout << "No numbers div by 3 and don't end 9" << endl;
return 0;
}
