Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program p_1
var
a: string
begin
writeln ('vvedite nazvanie rek');
read (a);
if (a='волга,днепро,нёман,енисей')then
writeln ('в беларуси протекают только днепро,нёман');
end.
бег-бог-лог-лаг-шаг
бант-кант-карт-кара-кора-коса
шар-бар-бам-бум-кум-куб
муха-мура-фура-фора-кора-корн-коан-клан-клон-слон
миг-маг-мак-бак-бек-век
var s1, s2: string;
begin writeln('введите строку'); readln(s1); writeln('введите слово'); readln(s2); writeln('позиция слова в строке'); writeln(pos(s2, s1)); end.
1л=1дм^3
8л = 0.008 куб метров
5.68кг=0.00568 тон
плотность
0.00568/0.008=0.71 тон на кубометр
500*0.71 = 355 тон влезет в цистерну
Популярные вопросы