Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
flexter228
08.12.2021 02:25 •
Информатика
№1 заменить слово ''вирус'' на ''антивирус'', № 2 найти произведение чисел натурального числа. информатика, pascal abc
Ответ:
polina3510
04.10.2020 11:39
№1
Если не требуется ввод числа с клавиатуры, то вот:
var a: String;begina:='вирус';Write('анти',a);end.
Если же требуется, то вот:
var a: String;begin
Write('Слово:');
Readln(a);Write('анти',a);end.
№2
var a,b,c:integer;
begin
Write('Первое число: ');
Readln(a);
Write('Второе число: ');
Readln(b);c:=a*b;
Write('Результат: ',c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ПоляУ1
26.11.2022 15:13
Считая, что каждый символ кодируется 1 байтом,оцените информационный объем следующего предложения в кодировке кои-8 : информация для человека-это знания...
yli2220
26.11.2022 15:13
1. две кучи. у васи есть две кучки камней. первая из них содержит x камней, вторая - y камней. за один раз мальчик может забрать из любой кучки один камень и положить его в другую...
borisevichdash
26.11.2022 15:13
Задан одномерный массив а[1..15]. определить сумму четных положительных элементов массива с n-го по k-й....
St1ler
26.11.2022 15:13
До комірки вз увели формулу =(d2+$f$2)*$g$2. потім цю формулу поширили вниз. в комірці в6 записана формула: =(d6+$f$2)*$g$2; =(d5+$f$2)*$g$2; =(b6+$f$6)*$g$2; =(d5+$f$2)*$g$6....
vladdubrovskiy1
26.11.2022 15:13
1. якою буде формула =a2*b2 з клітинки с2 після її копіювання в с3? =a2*b2 =a3*b3 =b2*c2 =b3*c3 2. якою буде формула =a2*$b$2 з клітинки с2 після її копіювання в с3? =a2*$b$2 =a3*$b$2...
Karon1337
26.11.2022 15:13
Напишите,,простенькую на паскале в кассе имеются денежные купюры достоинством m 1,5,10,50,100,500 рублей,необходимо выплатить сумму n наименьшим кол-вом...
emv63756
11.04.2020 00:15
Какое наибольшее целое значение h нужно ввести чтобы программа напечатала число 30. var a,b,t,m,r,h : integer; function f(h, x: integer): integer; begin f : = 11*(x-h)*(x-h)+13; end;...
DalinStreeet
25.02.2022 13:08
Дан двухмерный массив,из четных элементов кратных 5 сформировать массив а,из нечетных элементов кратных 3 сформировать массив б. )...
Стася911
18.01.2022 06:05
Для встановлення ос потрібно операційної системи. носій, на який установлено називають : 3...
aksnastena
18.01.2022 06:05
Решите в python 3.3 даны три натуральных числа a, b, c. определите, существует ли треугольник с такими сторонами. если треугольник существует, выведите строку yes, иначе выведите...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Если не требуется ввод числа с клавиатуры, то вот:
var a: String;begina:='вирус';Write('анти',a);end.
Если же требуется, то вот:
var a: String;begin
Write('Слово:');
Readln(a);Write('анти',a);end.
№2
var a,b,c:integer;
begin
Write('Первое число: ');
Readln(a);
Write('Второе число: ');
Readln(b);c:=a*b;
Write('Результат: ',c);
end.