НА пример:
var
a,b:=integer
begin
writeln('Введите число а');
read(a);
writeln('Введите число b');
read(b);
end.
Получается, что writeln Выводит на экран, что ты ввёл/ввела в скобках.
<span>var t,s,n:integer;
begin
readln(t);
s:=t*9;
if s>8 then n:=0 else n:=80-s;
writeln('n = ',n);
end<span>.
Пример:
15
</span><span>n = 0</span></span>
Составить алгоритм сложения двух целых чисел B и N, вводимых с клавиатуры. Результат сложения записать в виде переменной P. По данному алгоритму написать программу в Паскале.
Алгоритм
1)алг сложение
цел B,N,P
нач
ввод B
ввод N
P:=B+N
вывод P
кон
Программа в Паскале
1)program summa;
var
B,N,P:integer;
begin
readln(B);
readln(N);
P:=B+N;
writeln(P);
end.
Ответ:
1)11211111 или 1)1112111
2)332
Объяснение:
1)(1+3+3)*2+3+3+3+3+3=29 или 1)(1+3+3+3)×2+3+3+3
2)1+4+4+2=11
Ответ:100101001
Объяснение:Черный квадратик - 1, белый - 0