Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
Pailevanyan
09.06.2021 22:35 •
Информатика
Напишите программу для вычисления суммы трёх слагаемых
👇
Увидеть ответ
Ответ:
yfcnz1215
09.06.2021
Var a,b,c,s: integer;
begin
write('Введите первое слагаемое: ');
readln(a);
write('Введите второе слагаемое: ');
readln(b);
write('Введите третье слагаемое: ');
readln(c);
s:=a+b+c;
write(a,'+',b,'+',c,'=',s);
end.
4,7
(93 оценок)
Ответ:
DenchikKing
09.06.2021
Program Mat;
var a,b: integer;
begin
write ('Напишите числа, которые хотите сложить: ')
read (a,b);
writeln ('Сумма этих чисел равна ', (a+b));
end.
4,8
(12 оценок)
Открыть все ответы
Ответ:
vaper4
09.06.2021
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 x0 := 30; Y0 := 460; MaxY := 80; MaxX := GetMaxX; i := 1; T0 := rez[Id_T, 1]; Tk := 15; Tkv := 0.75; MoveTo(x0, Y0); While T0 <= Tk do begin x := X0 + 70 * Round( rez[Id_T, i] ); y := Y0 - Round( rez[Id_Zt, i] / 7.8 ); LineTo(x, y); T0 := T0 + Tkv; i := i + 1; DelaySeconds := Round(Tkv * 1000); Delay(DelaySeconds); end; { ...Построение графика }
4,8
(3 оценок)
Ответ:
adamswpp
09.06.2021
Вот программа с елкой:
Uses GraphABC;
Begin
SetWindowSize(600,400);
line(250,100, 300,50);
lineto(350,100);
lineto(250,100);
floodfill(300,70, clgreen);
line(220,200, 300,100);
lineto(380,200);
lineto(220,200);
floodfill(300,150, clgreen);
line(200,300, 300,200);
lineto(400,300);
lineto(200,300);
floodfill(300,250, clgreen);
rectangle(290, 300,310, 320);
floodfill(300,305, clbrown);
line(0, 300, 100, 350);
lineto(200, 320);
lineto(400, 320);
lineto(600, 370);
lineto(600,400);
lineto(0,400);
lineto(0
4,5
(24 оценок)
Это интересно:
Д
Дом-и-сад
03.03.2022
Как избавиться от хлама в доме: легкие способы на все случаи жизни...
С
Стиль-и-уход-за-собой
07.05.2021
Как удалить застрявший тампон...
К
Кулинария-и-гостеприимство
31.10.2020
Идеальные начос: как приготовить?...
О
Образование-и-коммуникации
07.05.2020
Как научиться рисовать людей: советы и примеры...
09.07.2022
10 советов как убедить родителей позволить вам завести маленькую собаку...
Ф
Философия-и-религия
20.10.2020
Как облечься во Всеоружие Божие: наставление для верующих...
К
Кулинария-и-гостеприимство
13.05.2023
Как отчистить старые кастрюли быстро и безопасно...
П
Праздники-и-традиции
14.05.2020
Как наполнить рождественский чулок: идеи для украшения...
К
Кулинария-и-гостеприимство
16.04.2021
Как выбрать емкости для хранения пищевых продуктов: советы и рекомендации...
З
Здоровье
11.09.2020
Как узнать, есть ли у вашего ребенка аллергия на глютен...
Новые ответы от MOGZ: Информатика
Oliawait
23.12.2020
Вкаких случая ниже данные противоречивы? 1) а=1, а& b=1 2) a=0, a& b=1 3) a=1, a√b=0 4)a=0, a√b=1...
tcacencoanastap08j8v
23.12.2020
Перевести число 0,625 в двоичную систему счисления...
98675423
23.12.2020
Двоичные числа а)11011000; б)11111010 переведите в десятичную систему счиления...
Love25252525
23.12.2020
Перевести числа а)113 ; б)144 из десятичной системы счисления в двоичную систему счисления...
rolik8
23.12.2020
Вчем заключается свойство дискретности внутренней памяти эвм?...
maxkostin29rus
19.05.2023
Информатика. выполнить действия: 1011+1000 1011-111 101*11...
AlinaFlowers
19.05.2023
Мощность алфавита равна 64.сколько кбайт памяти потребуется, чтобы сохранить 128 страниц текста, содержащего 256 символов на каждой странице? если можно, то пример решения)...
LIZETTA111
28.12.2020
Какие из перечисленных программ нельзя отнести к прикладным программам общего назначения: текстовые редакторы, драйверы устройств, электронные таблицы, базы данных?...
дариииинннкккааа
21.07.2020
Нужно написать программу для вычисления сопротивления по закону ома...
шахзода16
01.01.2021
Впрограмме «: =» обозначает оператор присваивания, знаки«+», «-», «*» и «/» - операции сложения,вычитания, умножения и деления. правила выполнения операций и порядок действий...
MOGZ ответил
Какой высоты должно быть плоское зеркало, повешенное вертикально, чтобы...
найти область определения и множества значений...
Определите среднюю плотность бетона если образец в виде куба с ребром...
Lg(2x-1) меньше или равно lg(2+x)...
решить задачку. Технология продукции общественного питания. Масса очищенного...
Дано: А (2, 4, 1), В (-3; -2; 4), С (3, 5, 2). Найти косинус угла С...
найти объем правильной четырехугольной пирамиды высота которой h, а боковая...
Суд по интеллектуальным правам (указать неверное положение): Выберите...
Прямоугольный треугольник с катетами 3см и 4см вращается вокруг гипотенузы....
Упражнение 2. Спишите, вставьте пропущенные буквы и знаки препинания....
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
begin
write('Введите первое слагаемое: ');
readln(a);
write('Введите второе слагаемое: ');
readln(b);
write('Введите третье слагаемое: ');
readln(c);
s:=a+b+c;
write(a,'+',b,'+',c,'=',s);
end.