Question

Напишите программу которая считывает два целых числа а и b и выводит остаток от деления a на b. Каждое число записано в отдельной строке

Answer 1

Ответ:

procedure TForm1.Button1Click(Sender: TObject);

var a,b,result:real;

begin

a:=StrToFloat(edit1.Text);

b:=StrToFloat(edit2.Text);

result:=a/b;

edit3.Text:=FloatToStr(result);

end;

Объяснение:

Писать на Лазарусе, предварительно создать три Edit'a, и одну кнопку, далее жмешь на кнопку и вводишь код.

Answer 2

Конечно! Вот пример программы на языке Python, который считывает два целых числа a и b, а затем выводит остаток от деления a на b:

pythonCopy code
# Считываем целые числа a и b
a = int(input("Введите первое число a: "))
b = int(input("Введите второе число b: "))

# Вычисляем остаток от деления a на b
remainder = a % b

# Выводим результат
print("Остаток от деления", a, "на", b, ":", remainder)

Скопируйте этот код в файл с расширением .py и запустите его с помощью интерпретатора Python. Программа попросит вас ввести два целых числа, после чего вы увидите результат вычисления остатка от деления a на b.