Пожалуйста, запишите програму по информатике вот так для задачки Program var begin write realn формула end задачка. Петрусь задумав число і нікому його не назвав. Друзі упіймали його і примусили подвоїти задумане число, а...
Пожалуйста, запишите програму по информатике вот так для задачки Program var begin write realn формула end задачка. Петрусь задумав число і нікому його не назвав. Друзі упіймали його і примусили подвоїти задумане число, а потім додати до нього 5. І тільки після того, як вони пообіцяли Петрусеві благодійну допомогу на контрольній з математики, він зізнався, що вийшло число n. Визначте, яке число задумав і приховав від своїх друзів Петрусь.
Ответ(ы) на вопрос:
Var n: integer ;
begin
writeln('vvedite chislo n');
read (n);
n:=n-5 ;
n:=n div 2;
writeln ('zadumannoe chislo=',n);end.
Не нашли ответ?
Похожие вопросы