напишите программный код последующей блок схемы

Напишите программный код следующей блок схемы

Задать свой вопрос
2 ответа
var t,s,n:integer;
begin
readln(t);
s:=t*9;
if sgt;8 then n:=0 else n:=80-s;
writeln('n = ',n);
end.

Пример:
15
n = 0
Паскаль? Если да, то:

program samsdelal;
var
t, s, n: integer;
begin
  readln(t);
  s:=t*9;
  if sgt;8 then 
    n:=80-s
    else n:=0;
  writeln(n);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт