ПЕРЕВЕСТИ ЯЗЫК ПАСКАЛЬ НА ПИТОН var

a, b, c: integer;

begin

Writeln('Введите два числа');

Read(a, b);

repeat

if a > b then

a := a mod b

else b := b mod a

until (a = 0) or (b = 0);

c := a + b;

Writeln('Наибольший общий делитель: ', c);

end.

Question

Информатика: ПЕРЕВЕСТИ ЯЗЫК ПАСКАЛЬ НА ПИТОН var a, b, c: integer; begin Writeln( Введите два числа ); Read(a, b); repeat if a b then a := a mod b else b := b mod a until (a = 0) or (b = 0); c := a + b; Writeln( Наибольший общий делитель: , c); end.

LightMAN2017 · Accepted Answer

Интернет по сути своей не представляет опасности для подрастающего поколения. Вредоносное влияние оказывают многочисленные сайты и всплывающие окна рекламного характера. Помимо образовательной роли виртуальная реальность таит и множество негативных моментов, в особенности для детей. Это может быть:

незаконный контент: «взрослая» реклама табака, алкоголя, секса, азартные игры, порнография;платные сервисы и услуги, которые оплачиваются отдельно;призывы к асоциальному поведению, насилию и жестокости;пропаганда сексуальной эксплуатации и суицидального поведения;общение на форумах и чатах с мошенниками, аферистами и преступниками под личиной доброжелателей;вынуждение предоставления личной информации ребенка или его семьи, которая может быть использована в преступных целях;Интернет-зависимость.

MOGZ ответил