Const
n = 12;
var
i, p: integer;
a: array[1..n] of integer;
begin
p := 1;
for i := 1 to n do
begin
a[i] := random(150) - 100;
write(a[i], ' ');
if a[i] > 0 then p := p * a[i];
end;
writeln;
writeln('P = ', p);
end.
2)uses crt;
var a:array [1..10] of integer;
i:integer;
begin
clrscr;
randomize;
{генерируем и выводим новый массив}
for i:=1 to 10 do
begin
a[i]:=random(9)+1;
write(a[i]:3);
end;
writeln;
{в цикле проверяем если счетчик i делится на 2 ( признак четности) то либо возводим в степень либо удваиваем}
for i:=1 to 10 do
begin
if (i mod 2=0 ) then a[i]:=a[i]*a[i]
else a[i]:=a[i]*2;
end;
{выводим конечный массив}
for i:=1 to 10 do
write(a[i]:3);
readkey;
end.
3)var arr:array[1..20] of integer;
max,q:integer;
begin
writeln ('ARRAY: ');
for q:=1 to 20 do
begin
arr[q]:=random(80);
write (arr[q]:3);
end;
max:=arr[1];
for q:=2 to 20 do
if arr[q]>max then max:=arr[q];
writeln;
writeln('MAX = ',max);
end.
#include "stdafx.h"
#include <iostream>
#include <string>
#include <fstream>
#include <windows.h>
using namespace std;
int main()
{
SetConsoleCP(1251);
SetConsoleOutputCP(1251);
setlocale(LC_ALL, "Russian");
int str;
cout << "Введите количество произведений: ";
cin >> str;
string glasnie = "ауоыиэяюеё";
string soglasnie = "бвгджзйклмнпрстфхцчшщ";
string * text = new string[str];
string buffer;
cin.get();
for (int i = 0; i < str ; i++)
{
cout << "Название [" << i + 1 << "]: ";
getline(cin, buffer);
text[i] += buffer;
}
cout << "\nСортировка по самому длинному названию: " << endl;
for (int i = 0; i < str - 1; i++)
{
for (int j = i + 1; j < str; j++)
{
if (text[i].length() < text[j].length())
{
string box = text[i];
text[i] = text[j];
text[j] = box;
}
}
}
for (int i = 0; i < str; i++)
{
cout << text[i] << endl;
}
cout << "\nСамое большое количество символов: " << text[0] << endl;
cout << "Самое малое количество символов: " << text[str-1] << endl;
int glasn_max = 0;
int glasn_min = 0;
string gmax, gmin;
bool check = 0;
for (int i = 0; i < str; i++)
{
int counter = 0;
for (int j = 0; j < text[i].length(); j++)
{
for (int k = 0; k < glasnie.length(); k++)
{
if (text[i][j] == glasnie[k])
{
counter++;
}
}
}
if (check == 0)
{
check = 1;
glasn_min = counter;
gmin = text[i];
}
if (glasn_max < counter)
{
glasn_max = counter;
gmax = text[i];
}
if(glasn_min > counter)
{
glasn_min = counter;
gmin = text[i];
}
}
cout << "\nСамое большое кол-во гласных: " << gmax << endl;
cout << "Самое малое кол-во гласных: " << gmin << endl;
int sglasn_max = 0;
int sglasn_min = 0;
string sgmax, sgmin;
check = 0;
for (int i = 0; i < str; i++)
{
int counter = 0;
for (int j = 0; j < text[i].length(); j++)
{
for (int k = 0; k < soglasnie.length(); k++)
{
if (text[i][j] == soglasnie[k])
{
counter++;
}
}
}
if (check == 0)
{
check = 1;
sglasn_min = counter;
sgmin = text[i];
}
if (sglasn_max < counter)
{
sglasn_max = counter;
sgmax = text[i];
}
if (sglasn_min > counter)
{
sglasn_min = counter;
sgmin = text[i];
}
}
cout << "\nСамое большое кол-во согласных: " << sgmax << endl;
cout << "Самое малое кол-во согласных: " << sgmin << endl;
delete[] text;
return 0;
}
Объяснение:
Писал в visual studio. Как работает: Вводишь число произведений, далее вводишь названия произведений. Ввел одно название, жмешь Enter, вводишь следующее название и так до конца.
Код получился большим относительно, можно меньше, но тогда будет немного сложен для начинающих программистов, поэтому писал максимально простым языком.
