Помогите, пожалуйста. Created by MiserySermon. informatika-ru

Помогите, пожалуйста...

March 2022 1 8 Report

Помогите, пожалуйста

Answers & Comments

elenaklon Var a:integer;
begin
write ('Введите четырёхзначное число: ');
readln (a);
if (a div 1000 + a div 100 mod 10 + a mod 100 div 10 + a mod 10) mod 3 = 0 then writeln ('YES')
else writeln ('NO')
end.

1 votes Thanks 1

esli summa cifr vvedyonnogo s klaviatury chetyryohznachnogo chisla delitsya na 3 bez o

Answer

MiserySermon November 2021 | 0 Ответы

pomogite pozhalujsta pascalf6225b3d4cd0f2296c63680a79bc7242 5974

Answer

MiserySermon August 2021 | 0 Ответы

opredelit kolichestvo celyh chisel kotorye mozhno zakodirovat 2 bajtami integer

Answer

Answers & Comments

pomogite pozhalujstaa74ff4cf1bcf43afec7fc00334507835 28645

najdite znachenie vyrazheniya1e3123aa809ac446ba8dcac60aecd380 29564

pomogite pozhalujstaf35935089155515255fcacf57487c188 60676

1 najdite summu chisel 10101 i 1110 v razreshennom kode 8razryadnom formate 2 s

17...

esli summa cifr vvedyonnogo s klaviatury chetyryohznachnogo chisla delitsya na 3 bez o

pomogite pozhalujsta pascalf6225b3d4cd0f2296c63680a79bc7242 5974

opredelit kolichestvo celyh chisel kotorye mozhno zakodirovat 2 bajtami integer

рекомендуемые вопросы

Helpful Links

Helpful Social