Войти Регистрация Спроси ai-bota

...НУЖНО НАПИСАТЬ В ПАСКАЛЕ

...НУЖНО НАПИСАТЬ В ПАСКАЛЕ

Показать ответ

Ответ:

Писинчик

10.06.2021 15:11

var x: real;

begin

write('Введите пароль: ');

readln(x);

write('ответ: ',trunc(frac(x*x)*10))

end.

0,0(0 оценок)

Популярные вопросы: Информатика

варяг2

14.11.2020 05:01

Вещественно-эноргетическая и информационная картина мира...

Shkolnikvolodya

18.06.2022 01:05

закомментировать код каждой строки { function block1_1(event) { const name = Yuriu ; const age = 20 ; const player = event.player; player.sendTitle(name, age, 5, 60,...

Kotik210

25.01.2022 19:01

Python.Дано рядок, який, можливо, містить пропуски. «Витягніть» з цього рядка всі символи, які є літерами і складіть з них новий рядок....

polinna2006p06aeo

29.05.2021 04:00

Из файла text.txt считать числовые значения x, y. x-1234,y-квадратный корень. найти сумму квадратных корней? си...

astanina042

27.12.2021 11:17

Если в ячейку ввести 09807 , каким образом эту запись интерпретирует open.office....

Прайм231

22.11.2022 14:52

Из куска проволоки сделали модель прямоугольника со сторонами a мм и b мм. можно ли сделать из этого куска проволоки равносторонний треугольник, длины сторон которого...

wexly

26.12.2022 10:51

Перевести с pascal в python или c++ var b,i: longint; c: integer; function sm(n: longint): longint; begin if n 10 then sm: =n else sm: =n+sm(inttostr(n).tochararray.select((c:...

abeke4

08.08.2020 19:38

Устройство для ввода звуковой информации в компьютер...

vyrov08

08.08.2020 19:38

Напишите код программы. код программы начало a=5 b=-3.5 s=a+b s=2*s-b s конец...

alinaaaa9

21.05.2022 02:21

Дано натуральное число n (n =15). заполните и выведите на экран квадратный двумерный массив размером nxn по следующему правилу: 1 1 1 1 1 0 1 1 1 0 0 0 1 0 0 0 0 0...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку