Есть ответ 👍

Решите тест по. информатике

250
404
Посмотреть ответы 2

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


1. А

2. А

3. Б

4. А

5. В

6. В

7. Г

8. (не совсем понятно, почему тут одинаковые варианты ответа) А, Б


Program n1; var a,sum: integer; begin readln(a); sum: =0; while (a< > 0) do begin if(a mod 6=0) and (a mod 10=6) then sum: =sum+a; readln(a); end; writeln(sum); end.

Популярно: Информатика