Составить алгоритм сложения двух целых чисел C и M , вводимых с клавиатуры. Результат сложения записать в виде переменной Z . По данному алгоритму написать программу в Паскале.

1)Алгоритм

А)алг сложение

цел C,M,Z

нач

ввод C

ввод Z

M:=C+Z

вывод Z

кон

Б)алг сложение

цел C,M,Z

нач

ввод C

ввод M

Z=C+M

вывод Z

кон

В)алг сложение

цел C,M,Z

нач

ввод C

ввод M

Z:=C+M

вывод Z

кон

2)Программа в Паскале

А)program summa;

var

C,M,Z:integer;

begin

readln(C);

readln(M);

Z:=C+M;

writeln(Z);

Б)program summa;

var

C,M,Z:integer;

begin

readln(C);

readln(M);

Z:=C+M;

writeln(C);

end.

В)program summa;

var

C,M,Z:integer;

begin

readln(C);

readln(M);

Z:=C+M;

writeln(Z);

end.

Почему-то мой ответ удалили. Напишу подробнее.
Если в чмсле первая цифра 4 и вторая цифра 3, то  числа от 4300 до 4399
На паскле программа выглядит так
var i, n: integer
begin
uses crt;
for i:= 0 to 99
begin
n = 4300 + i;
write (n);
end;
writeln;
end.
Блок-схема совсем простая, нарисуй сама.
1) Начало (в овале)
2) i = 0 (в прямоугольнике)
3) n = 4300 + i (в прямоугольнике)
4) Вывод n (в параллелограмме)
5) Проверка i > 99 ? (в ромбе). Если нет, возврат на п. 3. Если да, вниз.
6) Вывод пустой строки (в параллелограмме)
7) Конец (в овале)

Почему-то мой ответ удалили. Напишу подробнее.
Если в чмсле первая цифра 4 и вторая цифра 3, то  числа от 4300 до 4399
На паскле программа выглядит так
var i, n: integer
begin
uses crt;
for i:= 0 to 99
begin
n = 4300 + i;
write (n);
end;
writeln;
end.
Блок-схема совсем простая, нарисуй сама.
1) Начало (в овале)
2) i = 0 (в прямоугольнике)
3) n = 4300 + i (в прямоугольнике)
4) Вывод n (в параллелограмме)
5) Проверка i > 99 ? (в ромбе). Если нет, возврат на п. 3. Если да, вниз.
6) Вывод пустой строки (в параллелограмме)
7) Конец (в овале)