Напишите программу, которая выводит первое слово переданной её символьной строки. слово – это последовательность - id972596620230529 от filip198585 29.05.2023 19:12

Question

Информатика: Напишите программу, которая выводит первое слово переданной её символьной строки. слово – это последовательность непробельных символов, ограниченная пробелами или концами строки. входные данные входная строка содержит произвольную последовательность символов. выходные данные программа должна вывести первое слово этой строки. примеры входные данные vasya is a pupil. выходные данные vasya

filip198585 · Accepted Answer

Uses crt;
var
    b, a: real;
    n: integer;

begin
    clrscr;
    repeat
        Write('Выберите фигуру (1-квадрат, 2-прямоугольник)');
        Readln(n);

        case n of
            1:
                begin
                    write('Сторона квадрата=');
                    readln(a);
                    Write('S=', a * a);
                end;
            2:
                begin
                    write('Стороны прямоугольника=');
                    readln(b, a);
                    Write('S=', b * a);
                end;
        else exit;
        end;
    until false;
end.

MOGZ ответил