tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Решить в pascal даны три
Решить в pascal даны три слова a1,a2,a3 и их перевод p1,p2,p3. напечатать перевод заданного слова a4(a4=a1 или a2 или a3).
главный8
3 12.09.2019 06:10
0
Ответы
Dobrota2017
26.08.2020 19:27
A123,p123 переменные в прогу внести
readln(a4);
if a4 == a1 then writeln(p1) else
if a4 == a2 then writeln(p2) else
if a4 == a3 then writeln(p3);
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
nastik033
15.08.2019 19:20
Дано шестизначное число. найти произведение последних четырёх его цифр....
daniilkeidi
15.08.2019 19:10
Определити количество информации в сообщении о выходе из строя одного из восьми станков в данном цехе...
Yarmoshenkobchmd
18.02.2021 12:28
Установи соответствие с видом информации: яркое солнце —...
aimnura73
18.02.2021 12:27
Дано предложение. Определи, верно ли оно записано. Паводок—фаза водного режима реки. верно неверно...
Ксюхахаха
18.02.2021 12:26
Выбери верные правописания. « поэт » «VW » (поэт) «зелёный» (компьютер ) ( зелёный )...
Кристиночка2003
22.11.2020 00:48
Windows 10 На рабочем столе была папка photo ( с фотографиями, около 250), через телефон в компьютер отправил в отдельную папку несколько документов, в котором была папка с таким...
Clains
22.11.2020 00:57
Нужен 2 вариант Запара по инфе)8класс...
2004080111
22.11.2020 00:57
Windows 10На рабочем столе была папка photo ( с фотографиями, около 250), через телефон в компьютер отправил в отдельную папку несколько документов, в котором была папка с таким...
22.11.2020 00:58
Жаңа файл жасау үшін қандай командаларды орындау керек?...
vkmrr
22.11.2020 00:59
По каналу связи передаётся информация объёмом | = 128 Кбайт, время передачи t = 64 секунды.Определить пропускную ответ:Кбит/с...
Популярные вопросы
Какие это числа: ххlх,х,lvll,lххl....
3
Определите циклическую частоту колебаний в контуре, если емкость конденсатора...
2
Синтаксической разбор, грамматические основы предложении . 1. краткость сестра...
1
Cl2 + hno2 = (искала ответ, веде добавляет...
1
Кости надо купить альбом для рисования набор красок и кисточек сколько рублей...
3
Озаглавь части сказки.сказка про илью муромца...
3
Цена товара снижена на 20%. на сколько процентов надо повысить новую цену товара,...
1
Найдите дискриминант . x^2-12x+20=0...
3
Что делает людей похожими и что делает их разными и почему хорошо быть разными?...
1
Пословицы и поговорки на казахском языке про одежду! !...
1
readln(a4);
if a4 == a1 then writeln(p1) else
if a4 == a2 then writeln(p2) else
if a4 == a3 then writeln(p3);