Написать в программке Паскаль: Дано целое число. Если оно двузначное, найти
Написать в программе Паскаль: Дано целое число. Если оно двузначное, найти сумму его цифр.
Задать свой вопросprogram zz1;
var a, b, c, d:integer; // задаем переменные целого типа
begin
write( введите число ); // вводим с клавиатуры число
read(a);
if (a gt; 9) and (a lt; 100) then // проверяем условие, если число двузначное
begin
b:=a mod 10; // находим вторую цифру двузначного числа
c:=a div 10; // обретаем первую цифру двузначного числа
d:=b + c; // обретаем сумму цифр двузначного числа
write( сумма цифр двузначного числа = , d); // выводим один ответ
end
else
writeln( число не двузначное ); // выводим иной ответ
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Обществознание.
Математика.
Химия.
Русский язык.
Разные вопросы.
Разные вопросы.
Математика.
Русский язык.
Русский язык.
Разные вопросы.