Решите эти с паскаля (при оператора for) 1.задать с клавиатуры а и n. напечатать значение а в степени - id143029020220905 от ballas47 05.09.2022 05:15

Question

Информатика: Решите эти с паскаля (при оператора for) 1.задать с клавиатуры а и n. напечатать значение а в степени n. 2. напечатать большие буквы в строчку через 2 пробела. 3. ввести с клавиатуры 5 значений для х. вычислить и напечатать для каждого из них значение y по правилу: а)б) 3*x, если x =-9x/10, если x =-5 y = x-8, если -9=9x/10, если x =9

ballas47 · Accepted Answer

Так как в задании не указано, что введенное слово должно обрамляться пробелами, то код может быть такой:

var s,a:string;
    begin
    write('Введите строку : ');
    readln(s);
    write('Введите слово : ');
    readln(a);
       if(pos(a, s) <> 0) then writeln('Слово "',a,'" в строке есть')
       else writeln('В строке такого слова нет');
    end.

Тест №1
Введите строку : Привет участникам олимпиады!
Введите слово : ник
Слово "ник" в строке есть

Тест №2
Введите строку : Всем привет!
Введите слово : админ
В строке такого слова нет

MOGZ ответил