#include <iostream>
#include <math.h>
using namespace std;
int main()
{
setlocale(LC_ALL, "Russian");
int n;
cin >> n;
char* string1 = new char[n];
char* string2 = new char[n];
cin >> string1;
cin >> string2;
bool check = true;
if (strlen(string1) != strlen(string2))
cout << "Неверное количество символов";
else
{
for (size_t i = 0; i < round(strlen(string1) / 2); i++) {
if (string1[i] != string2[i]) {
check = false;
}
}
if (check)
cout << "Первые половины равны";
else
cout << "Половины первые не равны";
}
}
Var
m: array [1 .. 16] of integer;
i,countMin: integer;
begin
for i := 1 to 16 do
begin
randomize;
m[i] := random(100);
if(m[i] <10) then
countMin:=countMin+1;
end;
writeln('Исходный массив');
for i := 1 to 16 do
writeln('m[', i, ']=', m[i], ' ');
writeln("Количество элементов <10",countMin);
readln;
end.
Представим числа, как числа с основанием 2.
Ответ: в 4 раза.
//PacsalABC.Net
// (c) NaaMan
var
s : integer;
begin
write('Введите число (10-999): ');
readln(s);
writeln('В числе ', s, ' ', s.ToString.Length, ' знака');
write('Число ', s);
if s mod 3 = 0 then
write(' кратно')
else
write(' не кратно');
writeln(' трём')
end.
Использовать Робот
алг
нач
нц пока слева свободно
влево
кц
нц пока слева стена
закрасить
вверх
кц
вверх
нц пока слева стена
закрасить
вверх
кц
вверх
влево
влево
вниз
нц пока справа стена
закрасить
вниз
кц
вниз
нц пока справа стена
закрасить
вниз
кц
<span>кон</span>