<span>1.В Первую мировую войну впервые применили химическое оружие.
Во Великой Отечественной войне победу одержал Советский Союз. 2.У кошки четыре ноги.
Плоские черви - паразиты.
3. Всякий равносторонний треугольник есть равноугольный треугольник.
Прямоугольник с равными сторонами есть квадрат.
4.Русский язык - один из славянских языков.
Пунктуация изучает знаки препинания.
5. Пушкин - великий русский поэт.
Достоевский - один из популярных писателей.
6. Информатика жиздется на математике.
Компьютер облегчил жизнь человека.</span>
Program age;
var m:integer;
begin
readln(m);
if (m<=13) then writeln('детство');
if (m>=14)and(m<=24) then writeln('молодость');
if (m>=25)and(m<=59) then writeln('<span>зрелость</span>');
if (m>=60) then writeln('старость')
end.
Const
N = 8;
Var
A:array[1..N] of integer;
i:integer;
S:real;
Begin
Write('Введите массив A(',N,'): ');
For i:= 1 to N do
Begin
Read(A[i]);
S:=S+A[i];
End;
WriteLn('Sr = ',S/N);
End.
Пример работы программы:
Введите массив A(8): 1 2 3 4 5 6 7 8
Sr = 4.5
1) x=x+x и так 2 раза => x= 2*(5+5)=10*2=20
2)y=y*4 => y=5*4=20