tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Нужно расписать как в
Нужно расписать как в паскале: составить программу вывода на экран квадратов чисел от 1 до 10 с использованием оператора "while". (100 должна быть последняя цифра)
denis2013den
3 29.05.2019 11:40
0
Ответы
ygorbrusnyak
28.06.2020 13:17
Program asd;
USES crt;
var i,n,s:integer;
BEGIN
n:=2;
While s<100 do
begin
n:=n*2;
s:=n;
Writeln(s);
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
sasha1836
11.06.2019 04:20
Производится одноканальная (моно) звукозапись с частотой дискретизации 128 гц. при записи использовались 16 уровней дискретизации. запись длится 2 минуты 40 секунд, её...
Ruslan5278
11.06.2019 04:20
Информационный вес одного символа равен 2 байта. оценить информационный объем следующего сообщения : без труда не вытащишь рыбку из пруда...
Viksalexa
11.06.2019 04:20
Сообщение состоящие из 40 строк по 50 символов в каждой закодиравоно в кодах ascii и unicode. !...
sab005
11.06.2019 04:20
Транспорт - нужен для того заранее...
VaLeRiA102030405060
11.06.2019 04:20
Сообщение записано буквами 64 символьного алфавита и содержит 20 символов. какое количество оно...
Five1111
11.06.2019 04:20
Канада, бразилия, япония. общее имя...
хорошистка553
11.06.2019 04:20
Vm=128 кб кодировка 16 битная 1 символ =2 байта найти количество символов в книге...
komandaazart
29.04.2020 16:21
Дана блок-схема. Известно, что a=98;b=−7 . ответ: P =...
1123454321макс
15.09.2019 20:30
Коллеги впиши в таблицу имена и свойства объектов. учёный паскаль талантливый. шишкин композитор озеро лондон...
mrfurkan
08.10.2019 00:40
Сколько всего программ создало microsoft? ( примерное число -+ 10-15 программ)...
Популярные вопросы
Задание Прочитайте и выберите одно из высказываний критиков.Выразите...
2
Задача 8 рис 5.54 найти угол 1...
1
решит уравнение где к - натуральное число при котором дробь есть натуральное...
3
(4-с)+2(с-3)=-13 кароче решы...
3
Решите систему. {5х + у = -2{7х + 4у = 5а подстановки;б сложения;в)...
1
1.Что такое страх? 2.Что такое смелость?Какую роль она играет в жизнь...
3
Придумати 8 реченя з рызними орфограмами. (тире, видылення комами рызних...
1
Купили 4 зошити у лінію, а в клітинку - у 3 рази більше. На скільки...
2
Сколько процентов составляет Число 41, 61 от числа 73?...
3
З одного гектару землі у 2016 році зібрали 3,1 т зерна, у 2017 - 3,8...
2
USES crt;
var i,n,s:integer;
BEGIN
n:=2;
While s<100 do
begin
n:=n*2;
s:=n;
Writeln(s);
end;
end.