Войти Регистрация Спроси ai-bota

Дано двузначное число, определить в нём сумму

Ответ:

маьтвор

06.10.2020 10:37

var
x,s:integer;

begin
readln(x);
s:=0;
s:=x div 10+x mod 10;
writeln(s);
end.

0,0(0 оценок)

Ответ:

perevuznik1

06.10.2020 10:37

Program summ;
var x,s:integer;
begin
read(x);
s:=x div 10+x mod 10;
write(s);
end.

Например, вводим число 32, в ответе получаем s=5.

0,0(0 оценок)

Популярные вопросы: Информатика

tititititititi

15.06.2022 17:26

Составьте программу закрашивания указанных клеток с использованием цикла для, с переменной....

nastyyya4

24.04.2021 02:36

Яке слово утвориться при натисканні клавіші а, якщо курсор знаходиться справа від літери р в слові рок?...

mayerok

04.11.2022 04:14

Надо 1 пример текстовых сообщений зарание...

annavilnitskaja

04.11.2022 04:14

Дан массив x(n,m) .найти среднее арифметическое тех строк массива, первый элемент которых положительный...

мидина5

04.11.2022 04:14

Дан целочисленный массив x(n,m) . среди нечетных строк массива найти сумму четных элементов...

dghfgjuf

05.09.2021 11:07

Задано фрагмент алгоритму. Скільки разів буде виконуватися команда тіла циклу? num := 1; while num = 1000 do num := num * 2;...

natalyasergeev1

13.08.2021 09:42

Дайте розгорнуту відповідь на питання ! У Access: 1. Що таке параметричний запит? Коли він використовується? 2. Що таке перехресний запит? Коли він використовується?...

lera10211

25.08.2021 04:58

Вчислителе x-5 в знаменателе x в третей степени + x-2 нужно решить на языке pascal пользуясь алгоритмами о_о...

oligayaraya

28.05.2023 01:05

Составить текст к : нужно представить, что кто-то не умеет мыть посуду, убирать свою комнату. как ты объяснишь человеку, что и в каком порядке он должен делать?...

makesim

28.05.2023 01:05

Петя и коля играют в игру петя задумывает натуральное число не превосходящие 8 коля должен отгодать запись с хемой...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку