1 зелёный которые животные которые стоят возле цифр
Var
s,t,a,u0:real;
begin
writeln('Введите время');
readln(t);
writeln('Введите ускорение');
readln(a);
writeln('Введите началную скорость');
readln(u0);
s:=u0*t+((a*t*t)/2);
writeln(s);
<span>end.</span>
1. 1) 10 элементов, вещественный тип
2) 11 элементов, целочисленный тип
2. а) a: array[0..7] of integer
б) a: array[5..24] of integer
3. Будет напечатано: 14 8
1 уровень - country, family
2 уровень - syster, brother
3 уровень - нет
\family\mother.txt
\family\father.txt
\family\syster\mary.txt
\family\syster\kate.txt
\family\brother\peter.txt
\family\brother\robert.txt
\family\brother\mikle.txt
Program summa;
var i,n:integer;
begin
for i:=10 to 15 do
n:=n+i;
writeln('Summa 4isel ot 10 do 15= ',n);
end.<span>
</span>