Напишите программу которая в последовательности натуральных чисел определяет минимальное число кратное 3. знаю как написать программу для максимального числа var a: integer; b: longint; begin b: =0; readln(a); while (a< > 0) do begin if ((a mod 3=0) and (a> b)) then b: =a; readln(a); end; writeln(b); readln end. как для минимального? ?

в общем, это то же самое, что и для максимального, только вначале ты присваиваешь переменной min значение первого числа последовательности, а потом сравниваешь с этим числом все остальные. смотри:

 

в паскале:

var a, i, mix, n: integer;

begin

  write ('введите количество чисел в последовательности '); readln (n);

  write ('введите первое число последовательности '); readln (a);

  min: =a;

  for i: =1 to n do

  begin

  write ('введите следующее число последовательности '); readln (a);

  if (a mod 3 = 0) and (a< min) then min: =a;

  end;

  writeln ('минимальное число, кратное 3 в последовательности равно ', min);

end.

 

В1942 году американский   джон атанасов   и его аспирант клиффорд берри разработали и начали монтировать первый электронный компьютер. работа не была завершена, но оказала большое влияние на создателя первого электронного компьютера эниак. тот человек, кто придумал компьютер эниак – первую электронно-вычислительную цифровую машину, был  джон мокли , американский и инженер. джон мокли обобщил основные принципы построения эвм на основе опыта разработки машин и в 1946 году миру предстал настоящий электронный компьютер eniac. руководителем разработки был  джон фон нейман, изложенные им принципы и структура эвм в дальнейшем так и стали называться – фон-неймановскими

#include <iostream>

int main()

{

   setlocale(LC_ALL, "rus");

   double r1, r2, r;

   int connection;

   std::cout << "r1=";

   std::cin >> r1;

   std::cout << "r2=";

   std::cin >> r2;

   do {

       std::cout << "Выберите тип подключения (1-последовательно, 2 параллельно): ";

       std::cin >> connection;

   } while (connection != 1 && connection != 2);

   if (connection == 1) r = r1 + r2;

   else r = r1*r2/(r1 + r2);

   std::cout << "Результат r=" << r;

}