goryavinan
?>

Чем отличается электронная почта от обычный

Информатика

Ответы

Irina321t
1. Быстрая доставка
2. Гарантия что письмо не потеряется
3. Не нужно платить деньги за доставку
4. Не нужно выходить из дома
5. Большая экономия на бумаге и конверте
Andrei_Mariya

быстро, удобно, не тратишь бумагу , конверта не надо и тд

fednik3337923

Задача 1

program z1;

var n,a,i,k:integer;

begin

write ('Введите количество чисел: ');

read (n);

for i:=1 to n do

begin

write ('Введите число: ');

read (a);

if a = 0 then k:=k+1

end;

writeln('Количество нулей среди чисел: ',k)

end.

Задача 2

program z2;

var n,a,i,m:integer;

begin

write ('Введите количество чисел: ');

read (n);

for i:=1 to n do

begin

write ('Введите число: ');

read (a);

if i = 1 then m:=a;

if a > m then m:=a

end;

writeln('Максимальное число среди чисел: ',m)

end.

или

program z2;

var n,i,m:integer;

a:array[1..100] of integer;

begin

write ('Введите количество чисел (n<=100): ');

read (n);

for i:=1 to n do

begin

write ('Введите число: ');

read (a[i]);

if i = 1 then m:=a[i];

if a[i] > m then m:=a[i]

end;

writeln('Максимальное число среди чисел: ',m)

end.

marver201040

#include <iostream>

#include <ctime>

#include <cstdlib>

using namespace std;

int main()

{

   int n;

   int MIN;

   int counter = 0;

   cout << "Enter size of the array: ";

   cin >> n;

   int mass[n];

   srand(time(NULL));

   cout << "An array of the random elements:\n";

   for (int i = 0; i < n; i++)

   {

       mass[i] = 1 + rand() % 4;

       cout << mass[i];

       cout << "\t";

   }

   MIN = mass[0];

   for (int i = 1; i < n; i++)

   {

       MIN = MIN < mass[i] ? MIN : mass[i];

   }

   for (int i = 0; i < n; i++)

   {

       if (MIN == mass[i]) counter++;

   }

   cout << "\nNumber of elements that equal the min element of the array: " << counter - 1 << endl;

}

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Чем отличается электронная почта от обычный
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Fedorovna
АркадьевичБундин789
Maksim Dmitrii1579
Герасимова107
kengyra
gabramova
Orestov563
kulagin777
iptsr4968
Антонович937
masamosijcuk140244
randat887040
Avetisyan575
serov555zaq5
mbobo28311