#include <iostream>
#include <algorithm> // std::sort
using namespace std;
template <typename T>
void printSorted(T a[], int size)
{
sort(a, a + size);
for (int i = 0; i < size; i++) {
cout << a[i] << ' ';
}
cout << endl;
}
int main()
{
int ints[3] = {3, 2, 1};
double doubles[4] = {3.5, 2.6, 19.2, 8.1};
printSorted(ints, 3);
printSorted(doubles, 4);
return 0;
}
Var s:string; k,i:integer;
begin
write('Введите слово: '); readln(s);
k:=0;
for i:=1 to length(s) do
if s[i]='a' then k:=k+1;
writeln('В слове ',s,' буква а встречается ',k,' раз');
end. переставь значения и все норм будет
Просто нарисовать 8 разноцветных треугольников и обвести их, но все вместе
Const
n=6;
Type vector=array[1..n] of integer;
var x:vector;
i:integer;
pr:extended;
begin
<u>pr:=1;</u>
for i:=1 to n do
begin
readln(x[i]);
if x[i] mod 17=0 then
pr:=pr*x[i];
end;
writeln('proizvedenie= ',pr:4:4);
readln;
<span>end.</span>