Var
m,g,a:real;
Begin
Write('Введите массу и ускорение (Через пробел) ');
Readln(m,a);
g:=9.8;
Write('Сила сопротивления воздуха равна ',m*g-m*a);
End.
<span> алгоритм определения того, угрожает ли конь, стоящий на поле (k, l), полю (m, n)</span>
Шукай фото на вікіпедії.і просто напиши свої відчуття вчителі точно оцінять.
CLS
DIM
D(10)
DATA
12,10,11,34,3,3,2,3,4,5
S = 0
FOR i =
1 TO 10
READ
D(i)
IF i / 2
= i \ 2 THEN
ELSE
S = S +
D(i)
END IF
PRINT
D(i),
NEXT i
<span>PRINT
"S="; S
</span>
Мальчик дарит девочке шарики. Тем самым он воздействует на девочку.