Преобразуй алгоритм в программу на языке паскаль алг нач вещ

Новые вопросы по информатике

Объём видеопамяти составляет 100 Кбайт. Графический режим работает в режиме 640 х200 пикселей. Какое максимальное кол-во цветов может содержать палитра?

Переведите число 202 из восьмеричной системы счисления в десятичную

Переведите величины из одних единиц измерения информации в другие: 1 4 Гбайта=? Кбайт 2 217 Мбайт=? Гбайт 3 13 Мбит=? бит 4 27 Гбит=? бит 5 228 бит=? Мбайт 6 227 Гбит=? Мбайт 7 231 Кбайт=? Мбит

Вводятся 3 числа, вывести на экран нечетные числа pascal

1. Посчитай, сколько бит информации содержит 19 байт 2. Посчитай, сколько байт информации содержат 2 кб 3. Посчитай, сколько байт информации содержит 144 бит

Главная » Информатика » Напишите программу на языке паскаль По алгоритму Алг Нач вещ p, s P:=2 S:=0 Нц P:=p*1.5 S:=s+p Кц при p>5 Вывод S Кон Только на стандарте школьной программы.

Источник: abiturient.pro

Программирование линейных алгоритмов на языке Паскаль в PascalABC NET

Преобразуй алгоритм в программу на языке паскаль алг нач вещ

helpenzav83

July 2022 1 75 Report

Преобразуй алгоритм в программу на языке Паскаль.
алг пример
нач цел x, y
y:=0
нц для x от 1 до 9
y:=y*2+3
кц
вывод y
кон

Читайте также:
Как увеличить скорость мышки программа

Answers https://scholar.tips/preobrazuj-algoritm-v-programmu-na-yazyke-paskal-alg-primer-nach-cel-x-y-y0-n.html» target=»_blank»]scholar.tips[/mask_link]

Преобразуй алгоритм в программу на языке паскаль алг нач вещ

var
a, b, m: integer;

begin
read(a, b);
if a >= b then
m := a
else m := b;
writeln(m);
end.

Ответ проверен экспертом

triolana

triolana 6 лет назад
Светило науки — 562155 ответов — 388270 раз оказано помощи

1. Free Pascal

program MaxNum;
var a,b,m:integer;
begin
Read(a,b);
if a>=b
then m:=a
else m:=b;
Writeln(m)
end.

2. PascalABC.NET 3.2

program МаксимальноеЧисло;
begin
var a,b,m:integer;
Read(a,b);
if a>=b
then m:=a
else m:=b;
Writeln(m)
end.

Источник: znanija.info

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru