1. Информатика
  2. Составьте программу,которая

Составьте программу,которая загадывает пользователю загадку и дает ему три попытки отгадать ее.работа программы сопровождается диалогом с пользователем.желательно применить конкатенацию введенных строк.

Nadia3567 Nadia3567    1   10.07.2019 12:00    3

Ответы
Ramazanguly Ramazanguly  17.09.2020 12:24
Var a,d:integer;
begin
write ('Введите число: ');
readln (a);
write ('d,' ');
for d:=2 to (a div 2) do
if a mod d=0 then (write (d,' ');
write (a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Glados1 Glados1  27.06.2019 14:50
По заданной строке и символу определить сколько раз встречается этот символ в этой строке. информатика .qbasike функции...
whitesquirrelp06pc0 whitesquirrelp06pc0  27.06.2019 14:50
1) определите значение переменной «a» после выполнения фрагмента программы: a : = 10; b : = 5; if (a 5) and (a b) then a : = a - 5 else a: =a+5 2) a : = 10; b : = 5;...
дошикестдошик дошикестдошик  01.06.2019 20:40
Автомат получает на вход два двузначных шестнадцатеричных числа.в этих числах все цифры не превосходят цифру 5(если в числе есть цифра больше 6.автомат отказывается...
taniamishanina taniamishanina  01.06.2019 20:40
Уисполнителя калькулятор две команды,которым присвоены номера: 1.прибавь 2 2.умножь на 3. выполняя первую из них.калькулятор прибавляет к числу на экране 2.а выполняя...
Айшат77270 Айшат77270  23.07.2019 00:20
1. дан двумерный массив. найти сумму элементов этого массива. 2. в одномерном массиве сосчитать количество элементов равных 0 3. дан двумерный массив. найти произведение...
Theyom47 Theyom47  07.03.2019 23:40
Одна из возможных форм курсора 6 букв, 3 буква я...
Фарид55 Фарид55  03.10.2019 18:55
40 сделайте ⬇⬇где удобно хранить следующую информацию? 1)фотографии с друзьями.2)номера телефонов одокласников.3)рисунки сделанные на школьном компьютере.4)любимую...
muraitovaayana2 muraitovaayana2  03.10.2019 18:55
Какого длина ip-адреса (версии 4) в битах 1) 4 бита 2) 128 бит 3) 16 бит 4) 32 бита...
arishkakorneva arishkakorneva  03.10.2019 18:56
Сделайте в pascal abcна вклад в сберегательный банк внесено а рублей. в конце каждого года вклад увеличивается на p% от вклада за предыдущий год. сколько прибыли получит...
sabovkristiурис sabovkristiурис  24.11.2019 15:55
B. багатокутник розглянемо опуклий багатокутник з n вершин, з додатковою властивiстю, що в однiй точцi не перетинаються три дiагоналi. знайдiть кiлькiсть перетинiв...

Популярные вопросы