1)Напиши программу, которая запрашивает значение двух переменных и выводит их разность. Приглашение к вводу каждого числа произведите в отдельных строках. Вывод результата сопроводите пояснениями2)Напиши программу, которая, исп...
1)Напиши программу, которая запрашивает значение двух переменных и выводит их разность. Приглашение к вводу каждого числа произведите в отдельных строках. Вывод результата сопроводите пояснениями
2)Напиши программу, которая, используя, процедуру writeln, изоброзит на экране домик. Подпишите домик своей фамилией. Фамилию запросите при помощи оператора ввода.
ПОМОГИТЕ ПЖ ДАМ 100 БАЛЛОВ
Гость
Ответ(ы) на вопрос:
Гость1)
var a,b,r:integer;
begin
write('a = ');
readln(a);
write('b = ');
readln(b);
r:=a-b;
writeln(a,'-',b,' = ',r);
end.
Пример:
a = 21
b = 15
21-15 = 6
2)
var fam:string;
begin
write('Введите фамилию: ');
readln(fam);
writeln(' *');
writeln(' ***');
writeln(' *****');
writeln(' *******');
writeln('*********');
writeln('*** ***');
writeln('*** ***');
writeln('*** ***');
writeln('*********');
writeln('*********');
writeln;
writeln(' ',fam);
end.
Результат:
Введите фамилию: Master
*
***
*****
*******
*********
*** ***
*** ***
*** ***
*********
*********
Master
Не нашли ответ?
Похожие вопросы