Пожаловаться
- 17.01.2017 18:24
- Информатика
- remove_red_eye 9584
- thumb_up 19
Ответы и объяснения 2
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
begin
readln(t);
s:=t*9;
if s>8 then n:=0 else n:=80-s;
writeln('n = ',n);
end.
Пример:
15
n = 0
Пожаловаться
- 18.01.2017 04:43
- thumb_up 11
Паскаль? Если да, то:
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.
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.
Пожаловаться
- 19.01.2017 19:24
- thumb_up 49
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы