cout< < "количество десятков в вашем числе = "< < otvet< < endl;
}
Спасибо
Ответ дал: Гость
теперь не плагиат
program pr; var c: integer; beginwriteln('введите число с'); readln(c); writeln('остаток от целочисленного деления числа ',c,' на 10 в квадрате равен ',sqr(c mod 10)); end.
Ответ дал: Гость
for i : = 1 to length(s) do
begin
res : = res + s[i];
if i mod 2 = 0 then
res : = res + s[i];
end;
writeln(res);
i : = pos(" ",s); {ищем первый пробел}
delete(s; i; 1); {удаляем первый пробел}
i : = pos(" ",s); {ищем второй пробел, котрый теперь первый}
writeln(s[i-1]); {выдаем знак который находится перед пробелом}
Популярные вопросы