Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
alexxxxarchenko
28.06.2020 07:08 •
Информатика
Добрый день. решить на paskal. подсчитать сумму двухзначных чисел,сумма которых не превышает 7.
Ответ:
DariaTheBest5
29.07.2020 07:50
ответ лёгок. Пример: 43+(-40); 59+(-55) и т.д.
0,0
(0 оценок)
Ответ:
nastea3377
29.07.2020 07:50
Program test;
Var
i, i1:integer;
Begin
For i:=10 to 99 do begin
For i1:=10 to 99 do begin
if i-i1 < 7 then writeln(i,' + (-', i1,') =', i-i1);
End;
End;
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
KakЭтоTak
05.11.2021 18:31
Назовите свойства объекта операционной системы Рабочий стол (Кратко и не копируя ответы у других)...
соня1571
21.02.2022 12:15
MacroSD, MicroSD - это ... 1)внешний жесткий диск2)ленточный носитель информации3)флеш-накопитель...
roman5555554
18.05.2022 22:11
50 плз информатика 6 класс реши . веселые человечки решили сходить в поход. пончик испёк для всех пирожки с мясом, яблоками, капустой и повидлом и разложил их по пакетам, кулькам...
zdima2939
06.03.2022 23:31
Дан целочисленный массив размером 18 элементов. найти сумму чисел меньше 10.паскаль...
nayahoff123
05.11.2020 17:59
Даны два числа а и в. определить остаток от деления числа а на число в....
MIshaDo
05.11.2020 17:59
Напишите программу, которая выводит все простые числа, являющиеся палиндромами (то есть имеющие симметричную запись в десятичной системе счисления), в диапазоне от k до n ( 2 ≤...
миланка20051
28.07.2022 17:35
Каков был бы диапазон значений целых чисел, если бы для их хранения использовалась 4-разрядная ячейка?...
мама1033
10.03.2022 11:39
Определите значение переменной m после выполнения фрагмента m: =5for i: =1 to 10 do end; begin n: =i+2; if n 10 then m: =n+m*2 else m: =m+1...
s2702e
23.08.2020 16:35
Моя - вывести двумерный массив в консоль. под конец программы выбивает ошибка. что это может значить? p.s ошибка выбивает на рядке, который обозначено ниже, как err#include using...
bika20679
08.05.2022 17:46
Б за 1 задание с объяснениями...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Var
i, i1:integer;
Begin
For i:=10 to 99 do begin
For i1:=10 to 99 do begin
if i-i1 < 7 then writeln(i,' + (-', i1,') =', i-i1);
End;
End;
End.