Напишите программу для сложения двух однозначных чисел. Паскаль. + блок-схему составить отдаю все баллы если решите
Answers & Comments
Krile
Program kratno; var a,b,sum: integer; begin readln (a,b); if (a>=-9) And (b>=-9) and (a<=9) and (b<=9) then begin sum:=a+b; writeln (sum); end else writeln ('Введенные числа не являются однозначными'); end.
1 votes Thanks 1
arina987321
а так, бесконечно благодарна, для тебя есть отдельное место в раю
Krile
в паскале, вроде, наименьший диапазон от 0 до 255
arina987321
конкретно запрограммировать под однозначные, еще какие-то *если, то* надо писать (да, я умею объяснять)
Answers & Comments
var a,b,sum: integer;
begin
readln (a,b);
if (a>=-9) And (b>=-9) and (a<=9) and (b<=9) then begin
sum:=a+b;
writeln (sum);
end
else
writeln ('Введенные числа не являются однозначными');
end.