СРОЧНО!!!1)Составьте программу сумму и разность целых чисел A и B.2)Составьте программу нахождения первой цифры двухзначного числа а.3) Составьте программу вычисление суммы двузначного числа а.4) Составьте программу вычисления суммы цифр трехзначного числа а. Это разные задания !!!!
1 комментария:
пожалуйста помогите
пожалуйста помогите Ответы
Гость 1)
var a,b:real;
begin
readln(a,b);
writeln('А-Б=',a-b);
writeln(А+Б=',a+b);
end.
2)
var a:string;
begin
readln(a);
write(copy(a,0,1);
end.
3)
var a,s1,s2:string;
begin
readln(a);
s1:=copy(a,0,1);
s2:=copy(a,1,1);
write('Сумма цифр числа',a,'=',s1+s2);
end.
4)
var a,s1,s2,s3:string;
begin
readln(a);
s1:=copy(a,0,1);
s2:=copy(a,1,1);
s3:=copy(a,2,1);
write('Сумма цифр числа',a,'=',s1+s2+s3);
end.
6 комментария:
По идее должно быть так)
Да, СПАСИБО!!!☺
если это ты считаешь ответ правильным, поставь лучший ответ
твой ответ нельзя поставить лучшим,не знаю почему?
Короче, я не знаю!!!
Может быть появится тогда поставлю!!!
По идее должно быть так)
Да, СПАСИБО!!!☺
если это ты считаешь ответ правильным, поставь лучший ответ
твой ответ нельзя поставить лучшим,не знаю почему?
Короче, я не знаю!!!
Может быть появится тогда поставлю!!! Похожие вопросы
Информатика
Задание: чертение верблюда.Дайте ответ пж...
Информатика
Какие клички можно дать бульдогам и пуделям...
Список предметов
