Помогите по программе paskal: 1. Дано целое число

Question

Помогите по программе paskal: 1. Дано целое число. Напишите программу которая уменьшает на 2 модуль этого числа и выводит на экран мониторарезультат

Answer 1

50

klivzez

16 марта 2023

1) program test; var number: integer; begin write ('Enter the number: '); readln (number); number: =abs (number) -2; writeln (number); readln; end. 2) program test; var number, temp: integer; begin write ('Enter the number: '); readln (number); temp: =number mod 10; writeln (temp, '^2=', temp*temp); readln; end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: