Ne 1: введите число если оно делится на 7 без остатка, то увеличить его на 10, в противном случае увеличить его в 10 раз.
оля1441
1
16.05.2019 10:23
0
Другие вопросы по теме Информатика
senyacha15
03.06.2019 20:30
nik180208
03.06.2019 20:30
незнайка1117
03.06.2019 20:30
inna755780987
03.06.2019 20:20
lizniki82
03.06.2019 20:20
maxmxax25245
03.06.2019 20:20
serebrykov947
03.06.2019 20:10
исл5
03.06.2019 20:10
msvorobeva123
03.06.2019 20:00
ramn
03.06.2019 20:00
Популярные вопросы
- Какую роль в предложении играет предлог? Подлежащего Сказуемого Не имеет роли...
3 - Задание 1. Прочитайте текст. Определите его тему и коммуникативную задачу. Определите...
2 - Вещество, образовавшееся в результате реакции, представляет собой соединение,...
2 - Внимательно прочитай христианские заповеди на с. 21 учебника. Вспомни свои поступки,...
2 - Напишите сочинение-миниатюру «Фигурки зимнего леса»....
2 - Задание 6 Вопрос: Для чего делаются прибавки по талии, по бедрам? Выберите один...
3 - Угол при основании одного равнобедренного треугольника равен углу при основании...
2 - Побудуйте графік рівняння у+х^2/(х-1)^2+(у+1)^2 = 0 ...
1 - Математика 3 класс с.15 номер 5 2 часть как делать?...
3 - По вертикали: 1. Имя кучера. 2. Как звали лекаря? 3. Кого звала барыв когда услышала...
1
program gdd;
var
a:integer;
begin
writeln('Введи число: ');
readln(a);
if a mod 7 = 0 then
a:=a+10
else
a:=a*10;
writeln('ответ: ',a);
end.