Информатика, опубликовано 2018-08-22 19:04:16 by Гость
№ 1 задача заменить слово вирус на антивирус, № 2 задача найти произведение чисел натурального числа. ИНФОРМАТИКА, PASCAL ABC
Ответ оставил Гость
№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.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на