Составить программу, отгадывающее натуральное чётное число, загаданное пользователем. Ниже представлен рекомендуемый диалог во время работы программы: Загадайте натуральное чётное число Прибавьте к нему 4 Уменьшите на 6 Поделите на 2 Что у вас получилось? 3 Вы загадали число 8!

Question

Информатика

Людуша

1 января, 14:03

Составить программу, отгадывающее натуральное чётное число, загаданное пользователем. Ниже представлен рекомендуемый диалог во время работы программы: Загадайте натуральное чётное число Прибавьте к нему 4 Уменьшите на 6 Поделите на 2 Что у вас получилось? 3 Вы загадали число 8!

+1

Ответы (1)

Знаете ответ?

Купава · Answer 1

var i:integer;

begin

writeln ('Загадайте натуральное четное число.') ;

writeln (' Прибавьте к нему 4. Уменьшите на 6. Поделите на 2. Что у вас получилось?') ;

readln (i) ;

writeln ('Вы загадали число ', i*2+2) ;

end.