1. Дана последовательность целых чисел a, b, c. Найти минимальное из них, и разделить на него все числа. Входные данные вводятся пользователем с экрана. Вывод так же осуществляется на экран.

Question

1. Дана последовательность целых чисел a, b, c. Найти минимальное из них, и разделить на него все числа. Входные данные вводятся пользователем с экрана. Вывод так же осуществляется на экран.

Гость

Ответ(ы) на вопрос:

Accepted Answer

var a,b,c,min:integer; a1,b1,c1:real; begin write('a=');readln(a); write('b=');readln(b); write('c=');readln(c); if a