Лабораторная работа Тема: составление программ усложненной структуры Цель: развить навыки программирования алгоритмов различных структур Ход работы Задание 1.Дано натуральное число x. Найти первую цифру этого числа. Program dva; var x:integer; begin readln(x); while x>10 do x:=x div 10; writeln(x); end. Задание 2. , если 1≤ х ≤ 5, ∆x = 0,46. Вывод: развила навыки программирования алгоритмов различных структур
1/--страниц