Ввести число.если оно положительное,уменьшить его на 3,пока оно не станет отрицательным.если же число отрицательное,то увеличивать его на 2,пока оно не станет больше 70.ни экраны вевести оба число. записать в паскале! и если можно правильную блок схему!

zoggvik13ouid1r zoggvik13ouid1r    3   18.05.2019 19:50    6

Ответы
Bogdan300707 Bogdan300707  12.06.2020 01:16

var a:integer;
begin
readln (a);
if (a>0) then
repeat
a:=a-3;
until(a<0);

 

if (b<0) then
repeat
a:=a+2;
until (a>70);

writeln (a);
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика