Складіть програму обчислення рівнодійної сил F, що діють на тіло масою m, яке рухається з прискоренням а. F = ma
5-9 класс
|
Увеличением массы со скоростью пренебрёг (как и ещё много чем), извините за дерзость
var
m, a, F: real;
begin
writeln('Введіть дані про тілі:');
write('-Маса: '); readln(m);
write('-Прискорення: '); readln(a);
F := m * a;
writeln('--------------');
writeln('Pівнодійної сил: ', F, ' H');
end.
Комментарий удален
Другие вопросы из категории
второго сообщения?
Читайте также
напишіть програму обчислення добутків
a(a+1)(a+2)...(a+n+1)
солдат або один чи двое хлопчиків Складіть алгоритм переправлення солдатів
3. Знайдіть помилки у наведених фрагментах програми, запишіть фрагмент правильно, пояснивши суть помилки:
а) x:=1; a:=81;
for i:=1 downto 10 do
begin
x:=x*i;
a:=a+2*i;
end;
б) х:=1; y:=1;
repeat
y:=y*x+2;
x:=x-2
until x-12;
4. Визначте значення всіх змінних у результаті їх виконання.
а) x:=0; y:=1;
while y<4 do
begin
x:=x+y;
y:=y+1
end;
б) x:=0; i:=1;
repeat
i:=i+1;
x:=x+1/i;
until i>6;
5. Розробіть програму, яка виводитиме на екран значення квадратів та кубів натуральних чисел від 1 до n, де n>1 – натуральне число, значення якого задає користувач.
6. Розробіть програму, яка визначатиме суму парних чисел від 1 до 30.