М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

Разработайте на псевдокоде алгоритм (а если хочется и можется - реализующую его программу) вычисления суммы и произведения цифр трёхзначного натурального числа (будем считать, что данные точно корректны). напишите решение на языке visual basic

👇
Ответ:
EdinorogDog
EdinorogDog
07.07.2020
Допустим число 123. Нам нужно найти первое, второе и третье его число.
То есть 1,2,3. потом их сложить или перемножить.
Чтобы найти первое число нужно 123 разделить на 100,получиться 1.23,его мы округляем и получаем 1.
Второе мы находим деля 123 на 100,получаем остаток 23, делим остаток на 10 и получаем 2.
Третье число мы находим деля 123 на 10 и получаем остаток.
Потом складываем их или перемножаем.
Пример на  pascal:
//div это делить,mod отстаток
var a,b,c,s: integer;
begin
Write('Введи число: ');
Read(s);
a:= s div 100;
b:= s mod 100 div 10;
c:= s mod 10;
WriteLn('Сумма: '+a+b+c);
WriteLn('Произведение: '+a*b*c);
end.
4,4(83 оценок)
Открыть все ответы
Ответ:
prospekt888
prospekt888
07.07.2020
{это решение кв. ур, вот немного другой алгоритм:}
Program Math;
var
d,e,f, a, b, c: real;
begin
writeln('Решение квадратного уравнения(ax^2+bx+c=0).');
write('Введите a: ');
readln(a);
write('Введите b: ');
readln(b);
write('Введите c: ');
readln(c);
d:=sqr(b)-4*a*c;
writeln('D=b*b-4*a*c=',d:6:2);
if (d>0)
then begin
e:= (-b/(2*a));
f:= (sqrt(d)/(2*a));
writeln('D> 0, значит 2 корня: ');
writeln('x1= ',e-f:6:2);
writeln('x2= ',e+f:6:2);
end;
if(d=0) then writeln(' D=0, значит 1 корень: ',-b/2*a:6:2);
if (d<0) then
writeln(' D<0, значит корней нет ');
end.
4,4(33 оценок)
Ответ:
настя7585
настя7585
07.07.2020

Задание полностью

Внимательно прочитай текст:

Все эти животные живут, дышат, едят. Все они дикие животные, все имеют хвосты. Это их общие свойства. У лисы и медведя лапы и когти. Они хищники. У слона и лося – ноги. Они травоядные животные. Лиса тявкает. Медведь рычит. У слона бивни и хобот, а у лося рога и копыта, которых нет ни у лисы, ни у медведя.

Заполни таблицу:

Общие свойства для всех объектов

живут, дышат, едят, дикие животные, имеют хвосты

Общие свойства для пар объектов

лиса+медведь - есть лапы, есть когти, хищники

слон+лось - ноги, травоядные

4,7(2 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ