Найдите правильный ответ на вопрос ✅ «дано двузначное число (n). Найти сумму цифр двузначного числа. помогите сделать в паскале) . » по предмету Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Новые вопросы по информатике
Написать программу, которая выводит на экран результаты следующих действий: 27-5= 11+21= 32/2= 2+2*2= (2+2) * 2= Написать программу, которая выводит на экран результаты следующих действий: 21-4= 21+11= 43/3= 3+3*3= (3+3) * 3=
Вариант 2 1. Даны три числа. Найдите сумму второго и третьего числа. Найдите квадрат первого числа. 2. Даны длины сторон прямоугольника. Найдите площадь прямоугольника. 3. Даны длины катетов прямоугольного треугольника.
Найдите периметр треугольника.
Почему при А=1, В=1, С=1 ответ АVВ равно 1?
2. Какое значение будет иметь переменная b после выполнения следующих операторов присваивания: a:=3; b:=a+9; b:=a+b; b:=a-b+b/a. 3.
Python l Извлечение цифр из строки ( поиск чисел в строке)
Найдите наиболее точное общее имя каждой группе объектов: з) клавиатура, сканер, мышь
Главная » Информатика » дано двузначное число (n). Найти сумму цифр двузначного числа. помогите сделать в паскале)
Источник: iotvet.com
Найти сумму цифр двузначного числа — Pascal ABC (22600)
Если к сумме цифр двузначного числа прибавить квадрат этой суммы, то получится снова это двузначное число. Найдите все эти числа вот задание. я ковырялся, но так и не догнал что делать..
Program qq; var x,y,c: real; b,a: integer; begin for a:=10 to 99 do begin cls; x:=a div 10; y:=a mod 10; if a=10 then a :=(x+y)+(sqr(x+y)); Writeln (‘числа ‘,a) end; end.
может кто сказать, что тута не так?
Код к задаче: «Найти сумму цифр двузначного числа»
Листинг программы
Program qq; uses crt; var a,x,y: integer; begin for a:=10 to 99 do begin x:=a div 10; y:=a mod 10; if x+y+sqr(x+y)=a then writeln(a,’=’,x,’+’,y,’+’,sqr(x+y)); end; end.
Источник: studassistent.ru
Разработчику о работе с 1С:Предприятие, Pascal, Паскаль
Решение вопросов, возникающие при автоматизации учета с помощью 1С:Предприятие. Паскаль.
Найти сумму цифр двузначного числа в паскале.
17.05.2017 | 
Автор Дмитрий
Найти сумму цифр двузначного числа в паскале.
program Sum_Num1_Num2_Task; // Найти сумму цифр двузначного числа в паскале var i_NUm, i_NUm1, i_NUm2: integer; i_SumNUm: integer; begin i_SumNUm := 0; i_NUm := 48; i_NUm1 := i_NUm div 10; i_NUm2 := i_NUm mod 10; i_SumNUm := i_NUm1 + i_NUm2; // Вывод чисел на экран Writeln(‘Исходное число: ‘, i_NUm, ‘, первая цифра: ‘, i_NUm1, ‘, вторая цифра: ‘, i_NUm2); // вывод суммы цифр двузначного числа Writeln(‘Сумма цифр: ‘, i_SumNUm); //завершение работы программы WriteLn(‘Нажмите , чтобы выйти.’); ReadLn(); end.
Найти сумму цифр двузначного числа в паскале.
Разбор задач на выделение цифр из числа с использованием цикла while
Рубрика: Pascal (Паскаль) — задачи и решения
Источник: info1c.com