Складіть проект, у якому виконавець, поки до нього не доторкнеться миша, буде повторювати такі дії: рухатися вправо і говорити “Рухаюсь праворуч”, якщо буде натиснуто клавішу стрілка вправо і рухатися вліво, якщо буде натиснуто клавішу стрілка вліво і говорити “Рухаюсь ліворуч” Збережіть проект у файлі під назвою завдання_ 2.Вставте фото в ответе

var x,y,nod,nok: longint;

begin

read(x,y);

a: =x; b: =y;

while (a> 0) and (b> 0) do

if a> b then a: =a mod b

else b: =b mod a;

nod: =a+b;

nok: =(x div nod)*y;

write(nok);

end;

языки программированияязык программирования - это система обозначений, служащая для точного описания программ или алгоритмов для эвм. языки программирования являются искусственными языками. от естественных языков они отличаются ограниченным числом “слов” и строгими правилами записи команд (операторов). поэтому при применении их по назначению они не допускают свободного толкования выражений, характерного для естественного языка.можно сформулировать ряд требований к языкам программирования и классифицировать языки по их особенностям.основные требования, предъявляемые к языкам программирования: наглядность - использование в языке по возможности уже существующих символов, хорошо известных и понятных как программистам, так и пользователям эвм; единство - использование одних и тех же символов для обозначения одних и тех же или родственных понятий в разных частях алгоритма. количество этих символов должно быть по возможности минимальным; гибкость - возможность относительно удобного, несложного описания распространенных приемов вычислений с имеющегося в языке ограниченного набора изобразительных средств; модульность - возможность описания сложных алгоритмов в виде совокупности простых модулей, которые могут быть составлены отдельно и использованы в различных сложных алгоритмах; однозначность - недвусмысленность записи любого алгоритма. отсутствие ее могло бы к неправильным ответам при решении [].в настоящее время в мире существует несколько сотен реально используемых языков программирования. для каждого есть своя область применения.

var a: integer;

begin readln(a); if (4 * a > 9) and (4 * a < 100) then writeln('периметр двузначное число') else writeln('периметр не двузначное число'); end.

разбиваем числа на триады (группы по 3 числа в каждой), и смотрим значение по таблице, получается:

1) 6224

2) 64472