Задание: 1. Найти числа двухзначного числа (div, mod) 2. Первую цифру
Задание: 1. Отыскать числа двухзначного числа (div, mod) 2. Первую цифру помножьте на 100, вторую на 10 3. Найдите сумму получившихся произведений 4. Составить блок-схему 5. Написать программку
Задать свой вопрос1 ответ
Кира Стеничева
var a,c1,c2,p1,p2,s: integer;
f: boolean;
begin
f:=false;
writeln(Введите двузначное число:);
while f=false do
begin
readln(a);
if alt;0 then a:=a*(-1);
if (agt;9) and (alt;100) then f:=true
else writeln(Вы ввели не двузначное число. Введите еще раз:);
end;
c1:=a div 10;
c2:=a mod 10;
writeln(1) , c1, , , c2,.);
p1:=c1*100;
p2:=c2*10;
writeln(2) , p1, , , p2,.);
s:=p1+p2;
writeln(3) , s, .);
end.
Замечание: программа написана на Pascal.
Программка работает для двузначных и положительных и отрицательных чисел. Также осуществляется проверка того является ли данное число двузначным.
a - это исходное число
c1 - 1-ая цифра числа
c2 - 2-ая цифра числа
p1 - творенье первого числа и 100
p2 - произведение второго числа и 10
s - сумма творений p1 и p2
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
по шкале высот определить ,в каком направлении происходит понижение релефа уральских гор
География.
Помогите пожалуйста написать Сочинение Овчинникова "победитель'
Литература.
Здравствуйте. Нужен цитатный план испытания лётчика в лесу главы2-13 по повести
Разные вопросы.
Я хочу найти решение и ответ для этой задачи и получить
Математика.
Здравствуйте
Меня зовут Виталий, я AdOps-аналитик компании Adfinity.pro
Заинтересовал ваш проект obrazovalka.com
Думаю сможем увеличить
Разные вопросы.
мне очень срочно нужно сочинение по рассказу экспонат номер по дной
Литература.
мне очень срочно нужно сочинение по рассказу экспонат номер по дной
Литература.
В семье из трех человек три электронных устройства: ноутбук, планшет и
Разные вопросы.
Жаркыраган кашка маш жаралгандан ашка маш табышмак жообу менен
Кыргыз тили.
За лето подруги прочитали 48 книг.Причем Оля прочитала в 3 раза
Математика.
Облако тегов