program slova;
uses crt;
var s, s1: string;
i, k: integer;
begin
clrscr;
writeln ('Vvedite text: ');
readln (s1);
write ('Slova soderjaschie ne bolee 3-h bukv: ');
for i:=1 to length(s) do
begin
if s[i]<>' ' then
begin
s1:=s1+s[i];
k:=k+1;
end
else
if k<=3 then
begin
write (', ',s1);
k:=0;
delete (s1,1,3);
end
else
begin
k:=0;
delete (s1,1,15);
end;
end;
readln;
end.
Вроде так, но у меня щас нету компилятора, так что проверить не могу. Если что-то будет ругаться, или вопросы какие - пиши в личку.
А) var a,b,c:real;
begin
readln(a);
readln(b);
readln(c);
if (a>b) and (a>c) then writeln('Победил 1! Результат: ',a);
if (b>a) and (b>c) then writeln('Победил 2! Результат: ',b);
if (c>b) and (c>b) then writeln('Победил 3! Результат: ',c);
end.
Нужный язык программирования не указан. Наверное, тебе подойдет Си :с
int n, tmp; <em>// переменные для длины массива и временная</em>
int count = 0; <em>// переменная-счетчик для количества перестановок</em>
scanf_s("%d", &n;) <em>// считываем количество элементов в массиве</em>
int arr[n]; <em>// объявляем массив из n элементов</em>
for (int i = 0; i < n; i++) { <em>// формируем массив</em>
scanf_s("%d", arr[i]);
}
for (int i = 0; i < n; i++) { <em>// сравниваем два соседних элемента (j и j+1)</em>
for (int j = 0; j < n - i - 1; j++) {
if (arr[j] > arr[j + 1]) { <em> // свапаем элементы местами, если порядок неверный через временную переменную</em>
tmp = arr[j];
arr[j] = arr[j + 1];
arr[j + 1] = tmp;
count++; <em>// увеличиваем счетчик перестановок</em>
}
}
}
ptintf("%d", count); <em> //выводим количество перестановок</em>
<span>C:/библиотека /повесть /летопись </span>
1.
#include <iostream>
using namespace std;
int main()
{
setlocale(LC_ALL, "rus");
char arr[100];
int num = 0;
std::cin >> arr;
for (int i = 0; arr[i] != '\0'; i++)
{
num += 1;
}
cout << "Из 100 элементов массива занято: " << num << ", свободно: " << 100 - num << endl;
return 0;
}