Вычисли результат. 1.Возьми исходное значение. 2.Прибавь 10 3.ЕСЛИ полученное число меньше 20 ТО прибавь 3, ИНАЧЕ вычти 3. 4. Прибавь 2. 5. Конец. Исходные числа 5 20 9 25
Var a,b:integer;
begin
readln(a);
a:=a+10;
if a<20 then a:=a+3 else a:=a-3;
a:=a+5
end.
в паскаль это пишешь и все
Оцени ответ
