Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
маринапашко2000
10.10.2020 01:09 •
Информатика
Составить программу, которая позволяет найти сумму первой и третьей цифры в четырехзначном числе.
Ответ:
yliatroshenko
20.08.2020 23:49
Program test_sum;
begin
var inp_num : integer;
readln (inp_num);
var a, b : integer;
a := inp_num[0];
b := inp_num[2];
var res := a + b;
writeln ("Сумма 1 и 3 цифры равна: ", res);
end.
0,0
(0 оценок)
Ответ:
Desa11
20.08.2020 23:49
#include <iostream>
using namespace std;
int main(){
system("chcp 1251");
int n;
cout<<"введите 4-значное число";
cin >> n;
int first = n/1000; // первая цифра
int third = (n%100)/10;
cout << "\nответ = " << first + third << endl;
system("pause");
}
0,0
(0 оценок)
Популярные вопросы: Информатика
Nastyxas
26.11.2020 03:19
Составьте программу , которая заполняет массив а[1..10] случайными целыми числами в диапазоне от 1 до 10 , затем преобразовывает его, увеличивая все элементы с четными значениями...
Angel9087
25.02.2022 00:03
Выручайте 1. на диске осталось 10кбайт свободного места. возможно ли сохранить на этот диск 50 изображений по 250 байт каждое? 2. выполните перевод в биты: 1) 3 кбайта; 2) 1 мбайт;...
Иван7962
19.11.2021 22:25
Выполните дословный перевод словосочетания world wide web...
JEJH
19.11.2021 22:25
Смысл действия с информации свой пример из жизни...
Bonta
08.04.2022 05:01
Заданы 2 строки, состоящие из слов, разделенных пробелами. определить местоположение символа первой строки, который первым совпал с одним из символов второй. вывести первую строку,...
Tunior
29.04.2023 05:47
Program z1; var a,b,c,k: integer ; begin; read; k: =1; while (a 0) or (b 0) do; begin; b: =b*2; a: =a-b/2; if a =0 then wrileln( чёрт ) else begin; b: =b-c; a: =a+c; end; if b...
ninalolka
15.07.2020 22:33
Даю 30б за ответы. Информатика...
School957
16.10.2022 16:00
Поменяйте местами k1-ый и k2-ой элементы данного массива размерностью N (N 50). И выведите все элементы по порядку. Формат входных данныхN - количество элементов в массиве ArrArrn...
levusvaleria
15.05.2020 03:00
1. Как на нашу семью повлияла инфляция в 1990-е гг.? 2. Как можно защитить наши сбережения от деваль- вации рубля?...
bauka077
15.05.2020 03:00
Какие формы рельефа выделяют на дне океана...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
var inp_num : integer;
readln (inp_num);
var a, b : integer;
a := inp_num[0];
b := inp_num[2];
var res := a + b;
writeln ("Сумма 1 и 3 цифры равна: ", res);
end.
using namespace std;
int main(){
system("chcp 1251");
int n;
cout<<"введите 4-значное число";
cin >> n;
int first = n/1000; // первая цифра
int third = (n%100)/10;
cout << "\nответ = " << first + third << endl;
system("pause");
}