СОР № 1 Информатика 7 класс Шешімдерді бағдарламалау

Шешімдерді бағдарламалау

Задание:

Блок-схема бойынша бағдарлама кодын жазыңыз:

Решение:

program samsdelal;
var
t, s, n: integer;
begin
readln(t);
s:=t*9;
if s>8 then
n:=80-s
else n:=0;
writeln(n);
end.var t,s,n:integer;

begin

readln(t);

s:=t*9;

if s>8 then n:=0 else n:=80-s;

writeln(‘n = ‘,n);

end.

 

Пример:

15

n = 0