Куку, ахаза
первый ответ скорее всего правильный
Var a, b: integer;
begin
Writeln('Введите два числа');
Readln(a, b);
repeat
if a > b then a := a Mod b else
b := b Mod a;
until (a = 0) Or (b = 0);
writeln('НОД = ', a + b);
<span>end.</span>
//Microsoft (R) C/C++ Optimizing Compiler Version 19.00.23506 for x64
#include <iostream>
#include <bitset>
#include <sstream>
const size_t hex(const std::string& number)
{
size_t u_num = 0U;
std::istringstream ost(number);
ost >> std::hex >> u_num;
return u_num;
}
template <typename L, typename R>
const size_t& calculate(const L& l, const R& r)
{
return std::bitset<16>(l).to_ulong() + std::bitset<16>(r).to_ulong();
}
int main()
{
std::cout << calculate(hex("7c"), 5) << std::endl;
std::cout << calculate("11", hex("1d")) << std::endl;
}
1)
var
s: string[6];
n: integer;
begin
s := 'отлично';
n := length(s);
writeln(length('отлично'));
writeln(n);
end.
Изначально выставлен тип string[6], значит если присвоить строку больше, то ее обрежет по 6 символов, вот и весь прикол
Ответ 6
2) рисунок
3)var
s, s1: string;
n: integer;
begin
s := 'информатика';
s1 := copy(s, 3, 5);
n := pos(s, s1);
writeln('s=', s);
writeln('s1=', s1);
writeln('n=', n);
end.
Вывод
s=информатика
s1=форма
n=0
Все верно, в s1 не содержится s, а наоборот
Первый и последний вариант не подходят, так как требуют 9 двоичных разрядов. Подойдет только второе число 101010(2)
