5. Определите, для чего предназначены данные скрипты Заранее огромное

245

251

Посмотреть ответы 1

Ответы на вопрос:

Милана11347

Информатика

4,8(97 оценок)

1. var k, l, m, n: integer; begin readln(k,l,m,n); if (k+l+m+n mod 2 = 0) then writeln('поля одного цвета') else writeln('поля разных цветов') end. 2. uses crt; {в зависимости от компилятора эта строчка может оказаться лишней} var question, answer: integer; begin randomize(); question : = random(100); writeln(question); readln(answer); if (question+answer=100) then writeln('not bad') else writeln('oops. right answer is ', 100-question) end.