Массовый открытый онлайн-курс (сокр.: МООК; англ. Massive open online course, MOOC, произносится примерно, как «мук») — обучающий курс с массовым интерактивным участием c применением технологий электронного обучения и открытым доступом через Интернет[1], одна из форм дистанционного образования. В качестве дополнений к традиционным материалам учебного курса, таким как видео, чтение и домашние задания, массовые открытые онлайн-курсы дают возможность использовать интерактивные форумы пользователей, которые создавать и поддерживать сообщества студентов, преподавателей и ассистентов.
Program Sum; Var a, b: Integer; Begin Write('a = '); ReadLn(a); Write('b = '); ReadLn(b); WriteLn('Сумма a и b равна ', a + b); ReadLn; End.
Program SumRow; Const min = 5; max = 28; Var a, i: Integer; Begin a := 0; For i := min To max Do a := a + i; WriteLn('Сумма ряда равна ', a); ReadLn; End.
Program Digit; Var a, b: LongInt; c, d, i: Integer; Begin Write('a = '); ReadLn(a); b := 1; c := 0; While a Div b <> 0 Do Begin c := c + 1; b := b * 10; End; While a > 0 Do Begin d := d + (a Mod 10); a := a Div 10; End; WriteLn('Количество цифр в числе равно ', c); WriteLn('Сумма цифр числа равна ', d); ReadLn; End.
