logo
Войти Регистрация Спроси ai-bota


Аббос1111
04.08.2021 21:03

Вывести на экран квадраты и кубы целых чисел от 1 до 8. паскаль. ,ничего не понимаю : (

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
viki29051
viki29051
16.09.2020 00:25
Определите, для чего предназначены данные командыблоков, запишите ответы в тетрадях.Команды блоковфункцииСиггаПоделитесь своим мнением о важности диалога в приекте (напишите эссе).​...
Даниюша3223
Даниюша3223
31.03.2021 00:13
Задание 1 Во Сколько байт оперативной памяти будет занимать описанный массив? t: array [1..80] of boolean; Выберите один из 4 вариантов ответа: 1) 160 2) 10 3) 0 4) 80 Задание 2 Во...
кек946
кек946
22.01.2021 14:22
Запишите с блок-схем пословицу. Взялся за гуж, не говори, что не дюж. CРОЧНО...
Anyutahka
Anyutahka
01.08.2022 12:50
Виконай фрагмент програми та з ясуй, яким буде значення змінної після його завершення: k:3 1; а :3 100; while a 10 do begin a:=а/2; k:=k+1; 3 a 4 b 5 c 6 d 4 задание очень нужно Кто...
vladacherry2003
vladacherry2003
11.01.2022 04:33
Вкажіть знак, за до якого показують РІВНІСТЬ змінних. ​...
joseska228
joseska228
12.10.2022 12:09
Сколько значащих нулей содержится в двоичной записи значения выражения 8^1024 + 4^512 + 2^256 - 4...
rigorevich17
rigorevich17
25.11.2021 23:23
Ежедневник – это… а) носитель внешней памяти б) носитель внутренней памяти...
Тёна333
Тёна333
06.09.2020 03:09
Как называется глобальная компьютерная сеть, которая объединяет многочисленные локальные, региональные и корпоративные сети, а также компьютеры отдельных пользователей, разделённые...
DaimonBash
DaimonBash
28.09.2022 02:46
Определите значение переменной р после выполнении следующего фрагмента программы: m: =13; n: =21; n: =2*m-n; if m =n then p: =m+n else p: =4-m-n;...
SeyshellaGoa
SeyshellaGoa
27.02.2023 22:15
Саша по-своему нанес изображения букв на чистую клавиатуру.в частности .четыре подряд идущие клавиши в одном ряду он отвел под буквы f.g.h.j и а.п.р.о .среди этих четырех клавиш f...
Ответ:
mrlolik1500
17.09.2020 10:49
Var
i:integer;
begin
for i:=1 to 8 do
if i mod 2 <>0 then
writeln('Число ',i,' Квадрат ',i*i,' Куб ',i*i*i);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота