Вход
Регистрация
О проекте Как заработать?
59

Дан текст, в котором имеются цифры. Найти их сумму

tatarin69 20 августа 2022

Дан текст, в котором имеются цифры. Найти их сумму. Найти максимальную цифруНа языке програмирования! Паскаль АВС… Плиз помогите, срочно нужно

категория: информатика
ответить
в избранное

54

Program sum; var a,b,c: real; a: =пишешь число; b: =пишешь второе число; c: =a+b: writeln ('сумма равна ' ,c: 10:2); readln; end.

пользователи выбрали этот ответ лучшим
комментировать
в избранное ссылка отблагодарить

Знаете другой ответ?
Другие вопросы по информатике
irinka8-0
20 августа 2022
1
ответ
Дан целочисленный массив из 40 элементов, все элементы которого-целые числа в интервале от -500 до 500. Опишите на русском или на одном из языковпрограммирования алгоритм, который находит среднее арифметическое всех положительных элементов массива, которые кратны первому элементу (делятся нацело на первый элемент)
osullivan
20 августа 2022
1
ответ
В массиве хранится информация о среднедневной температуре декабря. Составьте программу, которая подсчитывает, сколько в декабре было дней с нулевой, отрицательной и положительной температурой.
gunn85
20 августа 2022
1
ответ
Приведите пожалуйста пример Архиватора, системы программирования и электронного учебного издания (учебник, тренажер, энциклопедия ипр.)
elzira
20 августа 2022
1
ответ
13. Соотнесите сетевые устройства и термины с их определениями. 1) MAC-адрес А) устройство, позволяющее компьютеру взаимодействовать с другими устройствамисети-‘это что? 2) IP-адрес B) специализированный сетевой компьютер, пересылающий пакеты данных между различными сегментами сети 3) сетевой адаптер C) уникальный идентификатор, сопоставляемый с различными типами оборудования для компьютерных сет
andry4
20 августа 2022
1
ответ
Составить программу нахождения ширины прямоугольника, если площадь и длина вводятся с клавиатуры.
olg15099
20 августа 2022
1
ответ
Создайте приложение, на форму которого помещены компоненты: Button — 1 шт. Label — 1 шт. Edit — 2 шт.
sntcs
20 августа 2022
1
ответ
10. Какие из перечисленных имен файловудовлетворяют маске? a*сk*.*1) black.avi 2) chacke.bmp3) norack.txt4) blask.png5) blaeck.docx 6) checker.exe
medved
20 августа 2022
1
ответ
Найдите сумму кратных 7 чисел, меньших 100
viktor-59
19 августа 2022
1
ответ
Паскаль. Программа работает, но выдает не тот результат — вставляет заданное число на первое место изачем-то меняет другими числами оставшиеся элементы массива. Что надо исправить? Условие: Вставить перед первым четным элементом массива заданное число.program vstavka; var i,n,k,z: integer; a: array[1… 1000] of integer; beginassign (input,'input.txt'); assign (output,'output.txt'); reset (input); rewrite (output); readln (n,z); for i: =1 to n do read (a[i]); i: =a[1]; for i: =1 to n doif a[i] mod 2=0 thenbeginfor k: =n+1 downto k+1 doa[i]: =a[i-1]; a[k]: =z; n: =n+1; break; end; for i: =1 to n do write (a[i],'); close (input); close (output); end.
Задайте свой вопрос

ПОПУЛЯРНОЕ
irinka8-0, 20 августа 2022
Дан целочисленный массив из 40 элементов, все элементы которого-целые числа в интервале от -500…
osullivan, 20 августа 2022
В массиве хранится информация о среднедневной температуре декабря
gunn85, 20 августа 2022
Приведите пожалуйста пример Архиватора, системы программирования и электронного учебного издания
elzira, 20 августа 2022
13. Соотнесите сетевые устройства и термины с их определениями
andry4, 20 августа 2022
Составить программу нахождения ширины прямоугольника, если площадь и длина вводятся с клавиатуры
olg15099, 20 августа 2022
Создайте приложение, на форму которого помещены компоненты: Button — 1 шт. Label — 1 шт. Edit — 2 шт
sntcs, 20 августа 2022
10. Какие из перечисленных имен файловудовлетворяют маске?
medved, 20 августа 2022
Найдите сумму кратных 7 чисел, меньших 100
viktor-59, 19 августа 2022
Паскаль. Программа работает…
27400
Алгебра
14821
Английский язык
14216
Биология
7369
Другой
720
Экономика
18828
Физика
8304
География
15850
Геометрия
5255
Информатика
11818
История
23332
Химия
15992
Литература
73118
Математика
8152
Обществознание
465
Правоведение
46271
Русский язык
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...