Предмет: Физика, автор: 666sq777qq

когда тела отталкиваются друг от друга, а когда притягиваются? ​

amun19: какие тела магниты или сверы может кубы?

Ответы

Автор ответа: adelpolya5896
1
Взаимодействие электрически заряженных тел: одноимённо заряженные тела отталкиваются, разноимённо — притягиваются друг к другу.
Автор ответа: aymanasova
0
Взаимо действие , закон Гука
Предыдущий вопрос
Следующий вопрос
Похожие вопросы
Предмет: Русский язык, автор: кимран2
6 предложений с вводными словами
1 год назад
Предмет: Қазақ тiлi, автор: igbfhiugehrgui
стихи про родину 8 строчек на казахском
1 год назад
Предмет: Английский язык, автор: pogosova4
СРОЧНО!!!!!! ОТДАМ ПОСЛЕДНИЕ БАЛЛЫ, ПРОШУ ПОМОЧЬ!!!! ЗАРАНЕЕ СПАСИБО:) ДОБРА
1 год назад
Предмет: История, автор: liza9139
На первую смену в лагерь было выдано 72 льготной путевки. На вторую на 25% больше. Сколько путевак было выдоно во вторую смену?
8 лет назад
Предмет: Информатика, автор: dd100229
Объясните пожалуйста все в этом коде:
Больше всего не понимаю:
begin
inc(n);
while (ARABIC[n] <= number) do
begin
sNumber := sNumber + ROME[n];
number := number - ARABIC[n];
//writeln(sNumber);
end

//ПРОГРАММА ДЛЯ ПЕРЕВОДА АРАБСКИХ
//ЧИСЕЛ В РИМСКИЕ
const
ROME: array[1..13] of string = ('M', 'CM', 'D', 'CD', 'C', 'XC',
'L', 'XL', 'X', 'IX', 'V', 'IV', 'I');
ARABIC: array[1..13] of integer = (1000, 900, 500, 400, 100, 90, 50,
40, 10, 9, 5, 4, 1);
var
number: integer;
sNumber: string;
n: integer;
//=========================================
// ОСНОВНАЯ ПРОГРАММА
//=========================================
begin
while(true) do
begin
repeat
writeln('Введите арабское число 1..3999');
number := ReadInteger();
//Если задан нуль, то работу с программой заканчиваем:
if (number = 0) then exit;
until ((number >= 1) and (number <= 3999));
//Формируем строку с римским числом,
//равным заданному числу number:
n := 0;
sNumber := '';
while (number > 0) do
begin
inc(n);
while (ARABIC[n] <= number) do
begin
sNumber := sNumber + ROME[n];
number := number - ARABIC[n];
//writeln(sNumber);
end
end;
writeln(sNumber);
writeln();
end;
end.
8 лет назад