(составить программу по pascal) дано двузначное число. определить, кратна ли сумма его цифр 6. подсказка: нужно отделить от числа единицы и десятки. чтобы узнать, сколько десятков в числе, нужно поделить число нацело на 10. результат присвоить какой-нибудь переменной. затем исходное число поделить с команды mod на 10 и результат записать в другую переменную.
alisha15sherban
2
29.05.2019 02:00
2
Другие вопросы по теме Информатика
nikiraspru
10.02.2021 10:17
nika99560
10.02.2021 10:15
san11217
10.02.2021 10:11
dorof077
10.02.2021 10:03
radich16
10.02.2021 10:02
ApuCTokpaT1
10.02.2021 10:01
lazarenko2
10.02.2021 09:56
1234567891155
10.02.2021 09:55
Популярные вопросы
- В прямоугольном треугольнике cosA= 5/корень26, вычислите tgA...
3 - ,СоЧ за 2 четверть 9 класс,вариант 5...
3 - ақпаратын дұрыс немесе бұрыстығын белгілеңіз Қорық сөзі өте ескі...
2 - выберите НЕВЕРНОЕ утверждение:...
1 - Перепишите предложения, раскройте скобки. (Не) полученная вовремя...
3 - Абыз айел майеты жанынан табылған бояу езетын зат калай аталады?...
1 - Изменить порядок интегрирования...
2 - 4.При натирании пластиковой палочки о сухую ткань оба тела электризуются,...
2 - надо написать 5 предложении и 5 прикалов которые пробуждают к...
2 - 3(а) Рассчитайте, сколько стоит 1 моль поваренной соли (хлорида...
1
var n, d, e, s: integer;
begin
readln (n);
d:=n div 10;
e:= n mod 10;
s:=d+e;
if s mod 6=0 then writeln (' сумма цифр числа кратна 6') else writeln (' сумма цифр числа не кратна 6');
end.