1. Информатика
  2. Напишите программу для решение

Напишите программу для решение с клавиатуры вводится целое число от 1 до 99 если число2-значное ,то вывести кол-во десятков в числе,иначе вывести введенное число увеличенное на 1 с dif и mod paskal

kotorosmax1 kotorosmax1    2   30.09.2019 23:10    0

Ответы
Опаснаятётя01 Опаснаятётя01  09.10.2020 06:32
Var a:integer;
Begin
read(a);
If a>10 then a:= a div 10
else a:= a+1;
writeln(a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
sabin200089 sabin200089  28.06.2019 19:50
Определите одной фразой, что определяет следующим фрагментом программы: бейсик … j = 0 for i = 1 to 10 if a(i)=0 then j=j+1 end if next i … паскаль … j: =0; for i: = 1 to 10 do if...
nasty286 nasty286  17.06.2019 07:30
Запиши число 112 (6) в десятичной системе счисления....
uztstdgiDima uztstdgiDima  24.08.2019 07:10
Ввести радиус(r) и вывести длину окружности(в паскале)....
АлинаПристать6 АлинаПристать6  07.10.2019 07:00
Вопрос таков: определить этапы создания многонационального российского государства в 16-17 веках. ,!...
Annet483 Annet483  07.10.2019 07:00
Дан параллелограмм wxyz . ya=az . вырази вектор wa−→− через вектор xa−→− и ay−→− . выбери правильный ответ: xa−→−−2ya−→ xa−→−+2ay−→− ay−→−2xa−→− ay−→+ax−→−...
bandygan666 bandygan666  07.10.2019 07:00
Усний твір за темою яким має бути ставлення до грошей у людини? гроші - це добро чи зло? за мотивами комедії і. карпенка-карого «сто тисяч»....
mol202kj00 mol202kj00  07.10.2019 07:00
Сочинение прилагательное в нашей жизни...
маша3055 маша3055  07.10.2019 07:00
С! нужно. составьте программу: дана таблица вещ таб b[1: 7]. замените каждый отрицательный элемент нулем. дана таблица вещ таб с[1: 10]. найдите максимальный элемент таблицы....
franktyoma franktyoma  07.10.2019 07:00
Написать сказку о добре. только не такой большой где-то средний....
nikfyodorov20 nikfyodorov20  07.10.2019 07:00
Федя покрасил в красный цвет все целые числа от одного до 10 и от 30 до 40 включительно а числа от 15 до 25 включительно покрасил в синий цвет коля отметила целые числа a и b так что...

Популярные вопросы