Program Albinur; uses crt; var v0,a,t : real; begin writeln('Программа вычисляет скорость объекта при равноускоренном движении'); writeln(' в заданный момент времени'); write('Введите начальную скорость в м/с '); readln(v0); write('Введите ускорение в м/с^2 '); readln(a); write('Введите время в с '); readln(t); writeln(); writeln(); writeln('*** Вычисляю... ***'); writeln(); writeln(); writeln('Через ',t,' секунд после начала движения скорость объекта будет равна ',v0+a*t,' м/с'); end.
Может быть, так: uses graphABC; Begin setfontcolor(clRed); writeln('Белеет парус одинокой'); setfontcolor(clBlue); writeln('В тумане моря голубом!..'); setfontcolor(clDarkOrchid); writeln('Что ищет он в стране далекой?'); setfontcolor(clDeepSkyBlue); writeln('Что кинул он в краю родном?..'); setfontcolor(clDeepPink); writeln('Играют волны - ветер свищет,'); setfontcolor(clMagenta); writeln('И мачта гнётся и скрыпит...'); setfontcolor(clDarkGreen); writeln('Увы! он счастия не ищет'); setfontcolor(clLime); writeln('И не от счастия бежит!'); setfontcolor(clBrown); writeln('Под ним струя светлей лазури,'); setfontcolor(clIndigo); writeln('Над ним луч солнца золотой...') End.
2) ¬A ∧ ¬B ∧ ¬C
Объяснение:
картинки по порядку
Общий порядок действий:
1) скобки
2) НЕ (¬, черта над выражением) - значение противоположно исходному высказыванию
3) И (∧) - истинно, когда оба исходных высказывания истинны
4) ИЛИ (∨) - ложно, когда оба исходных высказывания ложны