А B.
1
2 No
I
3. Дана таблица учета пропусков учащихся. Напишите функцию для вычисления количества дней, когда Алексей пропустил уроки.
C D E F G H
Учет пропусков уроков за неделю
Фамилия, имя пн вт ср чт пт сб Пропуски
1 Серикова Аружан
6
1
2]Новиков Алексей
6 | 2 6 | 6
3| Гумаров Дархан
4 Гучко Елена
2
6
Кол-во отсутствующих
3
4
Сл
6
7​

55555555555555555555555555555

Объяснение:

444444444444444444443333333333333333433

1) 

var

s: string;

begin

s: ='пробел';

writeln(s);

delete(s,4,1);

insert('д',s,4);

writeln(s);

end.

2)

var

i: integer;

a,b: string;

begin

readln(a);

b: ='';

for i: =1 to length(a) do

b: =b+a[i]+' ';

writeln(b);

end.

3)

var

a: string;

begin

readln(a);

if a[2]=a[4] then writeln('равны')

else  writeln('не равны');

end.

(если сумма цифр числа делится на 3, то число делится на 3 нацело)

var a, s: integer;

begin

s: =0;

writeln ('введите число');

while a< > 0 do

begin

a: = a mod 10  

s: =s+a;

end;

if  s mod  3 = 0  then writeln ('делится') else

writeln ('не делится');

end.