Как быстро выучить стихотворение наизусть? Запоминание стихов является стандартным заданием во многих школах.
Как научится читать по диагонали? Скорость чтения зависит от скорости восприятия каждого отдельного слова в тексте.
Как быстро и эффективно исправить почерк? Люди часто предполагают, что каллиграфия и почерк являются синонимами, но это не так.
Как научится говорить грамотно и правильно? Общение на хорошем, уверенном и естественном русском языке является достижимой целью.
- Обратная связь
- Правила сайта
Источник: www.soloby.ru
02.1_Автозаполение (Даты, дни недели, время, числа)
Написать программу, которая в зависимости от порядкового номера дня недели 1 . 7 выводит на экран его название (понедельник, вторник и тд.)
Найдите правильный ответ на вопрос ✅ «Написать программу, которая в зависимости от порядкового номера дня недели 1 . 7 выводит на экран его название (понедельник, вторник и . » по предмету Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Новые вопросы по информатике
Написать программу, которая выводит на экран результаты следующих действий: 27-5= 11+21= 32/2= 2+2*2= (2+2) * 2= Написать программу, которая выводит на экран результаты следующих действий: 21-4= 21+11= 43/3= 3+3*3= (3+3) * 3=
Вариант 2 1. Даны три числа. Найдите сумму второго и третьего числа. Найдите квадрат первого числа. 2. Даны длины сторон прямоугольника. Найдите площадь прямоугольника. 3. Даны длины катетов прямоугольного треугольника.
Найдите периметр треугольника.
Почему при А=1, В=1, С=1 ответ АVВ равно 1?
2. Какое значение будет иметь переменная b после выполнения следующих операторов присваивания: a:=3; b:=a+9; b:=a+b; b:=a-b+b/a. 3.
Найдите наиболее точное общее имя каждой группе объектов: з) клавиатура, сканер, мышь
Главная » Информатика » Написать программу, которая в зависимости от порядкового номера дня недели 1 . 7 выводит на экран его название (понедельник, вторник и тд.)
Источник: iotvet.com
Задачи на Паскаль с решением (8 класс)


Задача 1. Из двух наименьшее Напишите программу ввода с клавиатуры двух произвольных чисел

Трюк Excel 16. ВПР для множества значений (без использования функции ВПР)
Задача 1. Из двух наименьшее Напишите программу ввода с клавиатуры двух произвольных чисел X,Y.
Программа должна найти наименьшее число из введённых, и вывести его на экран.
Z1; var x, y: integer; begin writeln(‘x y: ‘); readln(x,y); if x then writeln (x) else writeln (y); end

program Z1;
var x, y: integer;
begin
writeln(‘x y: ‘);
readln(x,y);
if x then writeln (x)
else writeln (y);
end.
Задача 2. Из числа в неделю Составить программу, которая в зависимости от порядкового номера дня недели (1, 2,

Задача 2. Из числа в неделю
Составить программу, которая в зависимости от порядкового номера дня недели (1, 2, . 7) выводит на экран его название (понедельник. воскресенье).
Z2; var x: integer; Begin

program Z2;
var x: integer;
Begin
Writeln(‘введите число от1 до7’);
Readln(x);
if x=1 then writeln(‘пн’);
if x=2 then writeln(‘вт’);
if x=3 then writeln(‘ср’);
if x=4 then writeln(‘чт’);
if x=5 then writeln(‘пт’);
if x=6 then writeln(‘сб’);
if x=7 then writeln(‘вс’);
end.
program Z2;
Var x: integer;
Begin
Writeln(‘введите число от 1 до 7’);
Readln(x);
Case x of
1: writeln(‘понедельник’);
2: writeln(‘вторник’);
3: writeln(‘среда’);
4: writeln(‘четверг’);
5: writeln(‘пятница’);
6: writeln(‘суббота’);
7: writeln(‘воскресенье’);
end;
End.
Задача 3. Напечатать ряд из чисел

Задача 3. Напечатать ряд из чисел
Напечатать ряд из повторяющихся чисел 20 в виде: 20 20 20 20 20 20 20 20 20 20
Z3; var i: integer; begin for i:=1 to 10 do write(20,’ ‘); end

program Z3;
var i: integer;
begin
for i:=1 to 10 do write(20,’ ‘);
end.
Задача 4. Написать программу:

Задача 4.
Написать программу: Таблица умножения
Z4; var i, j: integer; begin for i := 1 to 9 do begin for j := 1 to 9 do write((i * j):4); writeln;…

program Z4;
var i, j: integer;
begin
for i := 1 to 9 do
begin
for j := 1 to 9 do
write((i * j):4);
writeln;
end;
end.
Задача 5. Найти сумму четных цифр числа

Задача 5.
Найти сумму четных цифр числа
Z5; var n,sum: integer; begin readln(n); sum:= 0; while n > 0 do begin if n mod 2 = 0 then sum := sum +…

program Z5;
var n,sum: integer;
begin
readln(n);
sum:= 0;
while n > 0 do
begin
if n mod 2 = 0 then
sum := sum + n mod 10;
n := n div 10;
end;
writeln(sum);
end.
Задача 6. Напечатать ряд из чисел

Задача 6. Напечатать ряд из чисел
Для целого числа K от 1 до 99 напечатать фразу
«Мне k лет», учитывая при этом, что при некоторых значениях K слово «лет» надо заменить на слово «год» или «года».
Например, 11 лет, 22 года, 51 год.
Z6; var k:integer; begin writeln(‘Введите число лет’); readln(k); case k of 1,21,31,41,51,61,71,81,91:writeln(‘Мне ‘,k,’ год’); 2

program Z6;
var k:integer;
begin
writeln(‘Введите число лет’);
readln(k);
case k of
1,21,31,41,51,61,71,81,91:writeln(‘Мне ‘,k,’ год’);
2..4, 22..24, 32..34, 42..44, 52..54, 62..64, 72..74, 82..84, 92..94: writeln(‘Мне ‘ ,k, ‘ года’);
else writeln(‘Мне ‘ ,k, ‘ лет’);
end;
end.
Материалы на данной страницы взяты из открытых истончиков либо размещены пользователем в соответствии с договором-офертой сайта. Вы можете сообщить о нарушении.
Источник: znanio.ru