Где записываются подпрограммы в языке Паскаль?
Выберите один из 4 вариантов ответа:
1) Только в составе циклов
2) После тела основной программы
3) Между заголовком основной программы и разделом описания переменных
4) Между разделом описания переменных и телом основной программы

ответ:1)7

2)2,4

3)1

4)1

5)2,4

6)4

7)1

8)1

9)1,4

10)1

s : = 1 ;

for i : = 1 to n do

  if a[i] mod 3 = 0 then

          s : = s * a[i];

writeln(s);

var a: integer;

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