Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Norefer
25.10.2022 18:30 •
Информатика
Написать программу перемножающую целые числа без использования операции «*». паскаль абс
Показать ответ
Ответ:
nastya4431
01.10.2020 13:56
P.S. Благодарность и лучший ответ не помешает.
var a, b, c, i:integer;
begin
read (a,b);
c:=0;
for i:=1 to b do
c:=c+a;
write (c,' ');
end.
0,0
(0 оценок)
Ответ:
badmaevo
01.10.2020 13:56
Var
a,b,n,i:integer;
begin
read(a,b);
for i:=1 to b do
n:=n+a;
writeln(n);
end.
Надеюсь на Лучший ответ ;)
0,0
(0 оценок)
Популярные вопросы: Информатика
ольга591
21.05.2021 11:32
Получить таблицу значений функции y = 5 ^ x-8lnx для всех значений х [0.5; 2.5] с шагом h = 0.25...
ИсхакТурдубеков
18.08.2022 00:54
Для яких цілей водій продавець можуть використовувати табличні процесори excel? ! , ! ...
rozarafo5
03.12.2020 18:11
Нужна программа на паскале, которая выполняет деление и возведение в степень разных переменных и записывает в конец файла....
Джейн2005
29.01.2020 09:10
, очень надо Нарисовать рисунок в паскаль авс (какой нибудь из этих двух), заранее...
Zsd19
03.01.2022 06:41
Постройте в программе word граф отношений, связывающих понятия: сообщение канал связи компьютерная сеть скорость передачи информации локальная сеть сеть...
npletnikova
03.02.2022 01:42
Дано слово . добавить к нему вначале и конце столько звездочек , сколько букв в этом слове ....
Abuhgghhhhhh
26.11.2020 21:15
Дз по немецкому. у.2 - письменно по заданию, выписать из прочитанного текста существительные (с предлогом и без него), определить число, род и падеж данных существительных....
nikitabyshek
07.02.2021 14:57
Два рільники, Іван і Григорій, можуть зорати поле за 6 годин. За скільки годин Іванможе зорати все поле, якщо Іван всю роботу може закінчити на 5 годин раніше, ніж Григорій?...
Fashion258
07.02.2021 14:57
Экожуйе курлымын атандар ?...
привет8917
09.12.2021 00:06
Спряжение слова бегают это русский а не геометрия...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a, b, c, i:integer;
begin
read (a,b);
c:=0;
for i:=1 to b do
c:=c+a;
write (c,' ');
end.
a,b,n,i:integer;
begin
read(a,b);
for i:=1 to b do
n:=n+a;
writeln(n);
end.
Надеюсь на Лучший ответ ;)