Задать вопрос
26 марта, 13:38

Нужно написать программу в Паскале

Дан механизм, состоящий из двух шестеренок. У одной шестеренки N зубцов, у другой K. Требуется найти какое минимальное число поворотов на один зубчик требуется сделать, чтобы шестеренки вернулись в исходное состояние.

+3
Ответы (1)
  1. 26 марта, 15:51
    0
    Program task;

    var i, n, k:longint;

    begin

    writeln ('n?') ;

    readln (n) ;

    writeln ('k?') ;

    readln (k) ;

    for i:=1 to n*k do begin

    if ((i mod n = 0) and (i mod k = 0)) then begin

    writeln (i) ;

    break;

    end;

    end;

    readln;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Нужно написать программу в Паскале Дан механизм, состоящий из двух шестеренок. У одной шестеренки N зубцов, у другой K. Требуется найти ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы