Задача 1070 Алгоритмы ветвления С клавиатуры...

zhanna200877@ma

03.05.2014

Алгоритмы ветвления
С клавиатуры вводится произвольное целое число. Если оно удовлетворяет заданным условиям, то уменьшить его на n, в противном случае – увеличить в m раз. Зарисовать блок-схему
Условие: Число делится на 10 без остатка или положительное
Значения n и m: n = 79 m =14

slava191

03.05.2014

[[[ Pascal ]]]
n:=79;
m:=14;
readln(K);
if(k mod 10=0) then K:=K-n else K:=K*m
writeln(K);