Задано двухзначное число а. Найдите сумму и произведение цифр числа (a1+a2 и a1 *a2). Var a, al, a2: begin write( введите а = '); read (); al:= a2:= write(' сумма цифр=", write(' произведение цифр, end.
Приложения:

Ответы
Ответ дал:
0
там где var, указываем тип переменных, ну к примеру integer
read(a)
a1:=a+a
a2:=a*a
ну и собственно там где сумма а1, а в следующей строке а2
Похожие вопросы
1 год назад
1 год назад
2 года назад