ПОМОГИТЕ СОСТАВИТЬ ПРРОГРАММЫ ДЛЯ ПАСКАЛЬ ABC!

Question

ПОМОГИТЕ СОСТАВИТЬ ПРРОГРАММЫ ДЛЯ ПАСКАЛЬ ABC! 1) Ввести с помощью read (); трехзначное число N. В нем зачеркули 1-ю слева цифру и приписали ее в концечисла. После этого число умножили на 10. Вывести полученное число 2) Ввести с помощью read (); числа A — сторона квадрата, R — радиус окружности (тип real). Выяснить, площадь какой фигуры больше: квадрата или круга.

Answer 1

86

mark9115

16 августа 2022

Program Zadacha; var N: integer; M: integer; Begin Read (N); M: =N div 100; M: =M+(N mod 100) div 10)*10; M: =M+(N mod 10)*100; WriteLn (M); ReadLn; ReadLn; End.

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

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

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

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

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