Дано двузначное число. Определить, кратна ли трем сумма его цифр?( Pascal). Created by ElikMakashin1asd2. informatika-ru

Дано двузначное число. Определить, кратна ли трем сумма его цифр?( Pascal)...

ElikMakashin1asd2 @ElikMakashin1asd2

August 2022 1 2 Report

Дано двузначное число. Определить, кратна ли трем сумма его цифр?( Pascal)

Answers & Comments

petyaGavrikov

Verified answer

Если вводится натуральное двузначное число:
var n,s:integer;
begin
write('n = ');
readln(n);
s:=(n div 10)+(n mod 10);
writeln('s = ',s);
if s mod 3 = 0
then writeln('Сумма цифр кратна 3')
else writeln('Сумма цифр не кратна 3');
end.

Пример:
n = 56
s = 11
Сумма цифр не кратна 3

6 votes Thanks 10

Answers & Comments

Verified answer

reshit tolko 1 nomerkak bolee podrobno

postrojte grafik funkcii yarccoscosx

tex]...

2sin2xcosx 10 reshit zhelatelno s chetkim obyasneniem i po kakim formulam zam

tex]...

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

Helpful Links

Helpful Social