1. процессами. 2. представление об автоматических и автоматизированных системах . 3. представление о - id921059120220302 от Saens321 02.03.2022 06:51

Question

Информатика: 1. процессами. 2. представление об автоматических и автоматизированных системах . 3. представление о робототехнических системах. желательно подробно, но чтобы информация уместилась в голове)

Saens321 · Accepted Answer

Var A,S,n:integer; Begin WriteLn( Введите целое число ); ReadLn(A); S:=0; n:=0; While A 0 do    Begin    S:=S+A mod 10;    n:=n+1;    A:= A div 10    End; WriteLn( Sr = ,S/n); End. Var A,S:integer; Begin WriteLn( Введите целое число ); ReadLn(A); S:=0; While A 0 do    Begin    if (A mod 10) mod 3 = 0 then S:=S+A mod 10;    A:=A div 10    End; WriteLn( S = ,S); End. Var A,m:integer; Begin WriteLn( Введите целое число ); ReadLn(A); m:=9; While A 0 do    Begin    if A mod 10 m then m:= A mod 10;   ...

MOGZ ответил